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EQ OOCK. 

'.0 ABSTRACT 

This diagnostic serves as a replacement to DEK8GA. the 11/70 Power 
Fail Test. It provides all of the coverage and features of the 
previous power fail test along with the added features of diagnostic 
support for multiprocessor systems using the KB11-CM Processor and the 
1 1ST interface. 

The test is divided into two sections. Section 1 and Section 2. 
Section 1 completely replaces DE'3GA and basically serves as a test of 
CPU logic validity during a power Fail sequence. This section can be 
run on a standard unmodified 11/70 processor as it utilizes no 
multiprocessor resources. Section 2 is enabled by enabling console 
switcn 6. This section will be executed directly after section 1. 
This section provides testing for proper functionality of the 
Interprocessor Interrupt and Sanity Timer (IIST) powerfail procedures, 
and memory system activity during a loss of power on the system or one 
of its subsystems. 

This diagnostic also supports the use of the UNI8US Exerciser (UBE) to 
perform simulated powerfail sequences during the execution of Section 



2.0 REQUIREMENTS 

2.1 Equipment 

THI3 DIAGNOSTIC IS DESIGNED TO TEST PDP-11/70 SYSTEMS USING THE KB-11B/C 
PROCESSOR. A CONSOLE TERMINAL IS REQUIRED FOR MESSAGE AND ERROR REPORTING. 
A UNIBUS EXERCISER MAY OPTIONALLY BE USED. 

NOTE: THIS DIAGNOSTIC ALSO SUPPORTS THE PDP-11/74. AN IN-HOUSE, EXPERI- 
MENTAL PROCESSOR IN BOTH STANDALONE AND MP MODES. 



2.2 Storage 

The Power Fail test runs in 12K words of memory. The first is used 
for stack areas and common access data. The second 4K contains the 
program itself. The only data elements that reside here are type and 
error messages, and execution flow and control variables that are used 



(modified) when the processor runs in multiprocessor mode. The next 
4K is used as buffer space for massbus transfers that occur during 
test 21. 
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d.l Pr»l lminary Procedures. 

All standard 11/70-74 CPU diagnostics should first be run to insure 
proper operation under a secure power condition. Specifically, the 
1 1ST diagnostic and Unibus Exerciser diagnostics should be rjn. If 
massbus devices are to be used for test 21 it might be wise to insure 
that the devices are in proper working order. The power fail 
diagnostic may use all massbus drives and memory boxes accessible by 
the CPUs participating in this diagnostic. Therefore, it is important 
to switcn offline to participating CPUs all data storage equipment 
that the operator does not want corrupted by this diagnostic. Before 
starting the power-fail diagnostic the operator should also be sure 
that the CPU power-up action switches (on the 1 1ST front panel) are 
all 'Kun or Halt" for participating CPUs, the 1 1 ST enable switches are 
"online", and the 1 1 ST configuration switches are all at the same 
system for all participating CPUs. All participating memory boxes 
should be online to all participating CPUs. 

The operator of this test should be familiar with the MKA11 and 1 1 ST 
boot/control panel. 



3.0 LOADING PROCEDURE 



This diagnostic can be loaded within the standard XXDP loading 
procedure. Note that if this diagnostic is being run as part of a 
chain that it must be the last element in that chain. 

This diagnostic is loadable under the APT system but can only be run 
under APT in Uniprocessor mode with the USE enabled. 



CO STARTING PROCt'DURF 
4.1 Starting Address 

The starting address for this diagnostic is 200. The restart address 
is 220. 



A. 2 Control Switch Settings 

The switch settings are as follows (when set to 1): 

SW15 - Halt on Error 

SW14 - Loop on test (Section 1 only) 

SW08 - Enable System Power Fail Test (Test 25) 

SW07 - Disable Section 1 Tests (Multiprocessor mode only) 



SU6 


SW5 


o 
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1 


1 


0 


1 


1 



Uniprocessor mode, manual power fail, 
(this mode can be used a a replacement for 
previous powerfail diagnostic) 
Uniprocessor mode, automatic CUBE) powerfail 
(uniprocessor mode that should be used under APT) 
Multiprocessor mode, manual powerfail. Both 
sections (1 and 2) are executed. 
Multiprocessor mode, automatic (USE) powerfail. 
Only Section 1 will use the USE. Each CPU 
must have a UBE. 

Note that for the multiprocessor modes (SU6 enabled) the 1 1 ST "system" 
ID of each CPU participating in the test should be specified by 
setting the appropriate bit in Switches 0-3 in the switch register. 
For example, if all processors in a 4 processor system are to be 
tested then switches 0-3 should be enabled. If only CPU's 0 and 2 are 
to participate th<»n only switches 0 and 2 should be enabled. 

The switches are defined by the master CPU only (in multiprocessor 
mode), where the master is the CPU that starts or restarts the 
program. Each slave CPU uses the switch definitions of the master. 

The Program will not interpret changes to the switches in 
multiprocessor mode while the program is running. The program must be 
restarted. 
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4.3 Restarting Procedures 

The restart address for this diagnostic is 220. A restart should be 
considered a completely new session therefore be sure the proper 
switches are enabled for the features that you want. 



4.4 Program And/Or Operator Action 

NOTE 

Be sure to isolate the CPU's that are to 
participate in the powerfail test from 
other CPU's that are to remain 
functional. Participating CPU's should 
have the 1 1ST configuration switches 
found on the 1 1ST panel switched to the 
SYSTEM B position (if this is the 
default position for the installation 
then the SYSTEM A position could be 
used) . 
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5.0 OPERATING PROCEDURES 

SfCi 000' 

5.1 Modes Of Operation 

This diagnostic is designed to run in four basic modes specified by 
the selection of bits 5 t 6 in the console switch register. It should 
be noted that if a multiprocessor mode is chosen (SW6 enabled) that 
the first CPU started will become the 'master" and successively start 
the remaining participating CPU's, the "Slaves". 



5.2 Common Procedures 

Load address 200 and then enable the switches for the test mode that 
is desired. Remember to enable the appropriate CPU mask bit if you 
are running a multiprocessor mode. When this has been done insure 
that all slaves are powered up and have their halt switches in the 
"enable" state if MP mode is to be used. Hit start - the program name 
will be typed followed by the mode the diagnostic is running in 
(uniprocessor or multi-processor) followed by the contents of the 
switch register and whether the Unibus Exerciser will be used to 
simulate power fails. 



5.3 Notes And Warnings 

1. Power failures in section 1 are only allowed when expected, 
therefore in manual mode do not remove the power until the 
test number appears in the display register. 

2. Power failures are not allowed during the execution of the 
End of Pass (EOP) routines. Note that the number displayed 
during the End of Pass is the Pass number NOT the test 
number. 

3. When running the diagnostic in uniprocessor mode on a single 
CPU that is part of a multiprocessor system make sure that 
the 1 1 ST configuration switch for the respecitve CPU is in 
the STAND ALONE position and the USJ ENABLE switch is in the 
OFF LINE position. 

4. When running in multiprocessor mode insure that the subsystem 
under test is isolated from any system that is still running 
by switching the CPU's under test to an alternate postion 
with the IIST CONFIGURATION swtiches. For example, if the 
default system normally runs on the "SYSTEM A postion, 
switch the subsystem under test to the "SYSTEM B" position. 
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5.4 uniprocessor Mode, No USE 

seq oooe 

The diagnostic will instruct you to "interrupt the power after the 
test number appears on the display". Interrupt the power only at this 
time. If the test is successful then the next test number should 
appear in the display. When the End of Pass is reached the Pass count 
will be typed. There are no error reports in Section 1 (except for 
unexpected traps to 4 and IK.) Normally, an error results in a 
processor halt. 

5.5 Uniprocessor Mode. With UBE 

In this mode the UBE is used to perform the power Fail procedure. No 
"interrupt the power. .." message is typed before the UBE takes action. 
The test number and pass number however do appear in the display 
register. An EOP message is typed equivalent to that of Section 5.4. 
Note that in this mode only the CPU logic involved in the power-fail 
sequence is tested. Failures that may occur because of problems in 
the Power system will go undetected. 

5.6 Multiprocessor Mode. No UBE 

In multiprocessor mode the CPU that is initially started becomes the 
'MASTER' CPU. What this means is that all error messages and typeouts 
will appear on this CPU's console. This CPU is also responsible for 
startup of "slave" CPU's. Slave CPU's are the remaining CPU's that 
are scheduled to participate in the test by their appropriate bit 
being set in switches 0-3 of the master CPU's SWR. When start is 
depressed and multi-processor mode is specified the program name, test 
mode, and switch register setting will be typed upon the master CPU 
console. The remaining CPU's will then be booted and then interrupted 
through the masters 1 1ST. This will be followed by an "interrupt the 
power. . ." message. 

The ID of the processor responsible for typeouts and error messages 
will precede the message: 

0> 
1> 
n> 

Run each processor through section 1 one at a time. After 
power-failing the last test in Section 1 (Test 16) on one CPU go on to 
the next CPU. etc. After the last test on the last CPU has been 
completed in Section 1, the operator will receive instructions at 
console. 

Whereas there are no prompts printed at the console in Section 1, all 
power fails in Section 2 must be done in exact agreement with the 
typed-out instructions. 

Section 2 prompts the operator to remove the power from a particular 
element of the system. If the expected results occur then the next 
element is tried. When all relevant elements have been tried then the 
diagnostic precedes to the next test. Section 2 contains tests 17 
through 25. 



5.7 Multiprocessor Mode, with UBE SEO 0009 

This mode is the same as 'multiprocessor mode, no UBE" except that 
Section 1 will be done without manual intervention. ALl CPUs that are 
to participate must have a UBE module. 

6.0 ERRORS AND ERROR REPORTING 

Error reports are always typed out on the console of the CPU that was 
first started. This is the 'master" CPU in multiprocessor mode. All 
error messages are preceded by a tag as follows 'n>* where n's the 
1 1ST self-ID of the CPU encountering the error. Typing in 
multiprocessor mode is always done by the master. If the master is 
without power when typing is required, the messages will be queued and 
printed when power has been restored. 

7.0 TEST DESCRIPTIONS 

The tests that are found in section I are simple power fail tests that 
guarantee that the proper machine states are entered on power fail and 
power up. The test names are self- explanatory. 

Section 1 



1. Simple Down/Up test (Kernal node) 

2. Program Voltility Test 

Verify that the memory bank containing the program will rot 
be corrupted by CPU power fails. 

3. Simple Down/Up test (Supervisor mode) 
A. Simple Down/Up Test (User mode) 

5. Power fail with odd address 

6. Power Fail in the Red Zone 

f. Power Fail with memory timeout (kernal) 

10. Power Fail in the yellow zone. t 

11. Power Fail with resets. 

12. Power Fail with odd address (Supervisor). 

13. Power Fail with Timeout (Supervisor) 
K. Power Fail with odd address (User) 

5. Power Fail with timeout (User) 

16. Memory Management Abort Test 
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Section 2 

SEO 0010 

After all CPUs reach the beginning of Section 2, each CPU 
sizes for RP04/5/6 massbus devices. If no devices are found 
the following message is printed: 

No Massbus Device Available On CPU #n 

If the only massbus device found has its PGM bit set, the 
following message is printed: 

Warning: Drive fin 
On CPU fin 

Is accessible over Ports A and B 



and will be used later in this diagnostic. 

17. Check ' QRK' ' t 'DCF" FLAGS during power fail. Insure that the 
IIST's of functioning CPU's receive BftK ft DCF signals 
corresponding to the CPU that performed a Power Fail. 

The operator will be prompted with messages of the following 
type: 

Power Fail CPU fin 
After restoring power, each of the other CPUs should report: 
CPU Interrupt As Expected 



20. Check power fail during high memory activity. Insure that 
power down sequences can be performed by a CPU while other 
CPU's are contending for the memory bus. 

The operator will be prompted with messages of the following 
type: 

Power Fail CPU fin 
There is no report from the other CPUs after restoring power. 



21. Check power fail during massbus transfer. Insure that power 
down sequences can be performed by a CPU while other CPU's 
are performing massbus read operations. Also verify that the 
read operations don't experience any loss of data due to the 
power condition of an un involved CPU. 

The operator will be prompted with messages of the following 
type: 



Power Fail CPU fin 



It there are no massbus devices for the other CPUs to use. 

then the following messages are printed instead of the above SEQ 0011 

message: 

No Massbus Device Available On CPU #n Proceeding 
To Next CPU. 

There is no report from the other CPUs after restoring power. 



22. Insure that a loss of Af power on a MKA11 semiconductor 
memory box does not cause a power fail sequence to occur on 
any processor that has a disabled part to that box. 

The operator will be prompted with messages of the type: 

Get Set To Power Fail Mem Box Kn 

Put battery backup on all memory boxes 

Make all memory ports offline only on mem box to be power 
failed 

Make all CPU power-up switches "Run or Halt" 

Now Power Fail The Mem Box 

Restore power 5 seconds after power fail 

Restore all memory ports online 

Then type any character at the master console 

No CPU should report a power fail 

The master should report "OK". 

23. Check AC power fail on memory box. Insure that a loss of AC 
power on a MKA11 semiconductor memory box causes a power fail 
sequence to occur on any processor that has an enabled port 
to that box. 

The operator will be prompted with message of the type: 

Get Set To Power Fail Mem Box Mn 

Put battery backup on all memory boxes 

Make all memory ports online 

Make all CPU power-up switches "Run or Halt" 

Now power fail the mem box 

Restore power 5 seconds after power fail then type any 
character at the master console. Each CPU should report a 
power failure. 

■ 

Each CPU should report the following message: 
Power Failure On CPU As Expected 



24. Check DC Power Loss on a memory box. Insure that the slave 
CPU(s> specified through the 1 1ST Boot/control panel perform 
a boot operation when AC & DC power are restored to the 
memory box. 

The operator will be prompted with message of the type: 
Get Set To Power Fail Mem Box #n 



Disable battery backup on mem box to be power-f ai l<»d. Pot 
all slave CPU mem ports online. Make master CPU mem port 
offline only on box to be power-failed. Make all CPU 
power-up switches 'KUN OR Boot . 

Now Power Fail The Mem Box 

Restore power 5 seconds after power fail 
Restore all mem ports online 

Restore all CPU power-up switches to 'Kun or Halt" 
Then type any character at the master console 
Each slave should report an interrupt 

Each slave CPU should report the following message: 

CPU Interrupt As Expected 

25. Check system recovery on power fail. Insure that a total 
momentary loss of AC power on a system level is recoverable 
without operator intervention. 

The operator will be prompted with the following message: 

Get Set to Power Fail Entire System... 

Put battery backup on all mem boxes 

Make all memory ports online 

Make all CPU power-up switches 'Run or Halt" 

Now Power Fail the Entire System 
Restore power 5 seconds after power fail 

Each CPU should report the following: 



8.0 MISCELLANEOUS 
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T est 2** will rot be done on the memory box with base address 0. 
Therefore, in order to tullY test all system elements the operator 
should restart this diagnostic a second time and switch the box with 
base address 0 with another box (using the thumbwheels to switch base 
addresses). The operator should also switch master CPUs on the 
restart. 



Test 22 will be skipped if there is only one MKA11 memory box. Power 
'ailing through Section 1 with the UBE will not necessarily test power 
tail during odd address trap, timeout, etc. (it depends on when the 
JBf starts the power down). Therefore, it is recommended to manually 
power fail Section 1 '. 
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TITl F MAINDEC-11-CEKBG-C 
•COPYRIGHT (O 1978 
•DIGITAL EOUIPMENT CORP. 
•MAYNARD, MASS. 01754 
• 

•PROGRAM By JIM LACE Y . JEFF WHITE, BILL SCHLUZKUS 

•THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
•PACKAGE (MAINDEC-11-D/QAC-C3). JAN 19. 1977. 



11-70/74 SYSTEM POWER FAIL DIAGNOSTIC 



THIS DIAGNOSTIC IS DIVIDED INTO TWO SECTIONS: SECTION 1 TESTS THE 
BASIC ABILITY Of A PROCESSOR TO SUCCESSFULLY ENTER AND RECOVER 
FROM A POWER FAIL CONDITION. THIS SECTION REPLACES. IN FUNC- 
TIONALITY, THE PREVIOUS POWER FAIL DIAGNOSTIC DEKBGA AND PROVIDES 
EQUIVALENT DIAGNOSTIC COVERAGE. THIS SECTION AND ONLY THIS 
SECTION WILL BE RUN IF THE MP SWITCH (SWITCH 6) IS DISABLED. 

SECTION 2 OF THIS DIAGNOSTIC PROVIDES DIAGNOSTIC COVERAGE 
FOR MULTIPROCESSOR CONFIGURATIONS UTILIZING THE IIST INTERFACE 
AS A MEANS OF INTERPROCESSOR COMMUNICATION. IF THE MP SWITCH 
(SWITCH 6) IS ENABLED BOTH SECTION 1 AND SECTION 2 ARE PERFORMED. 
ALSO THE IIST IS USED IN SECTION 1 TO INITIALIZE AND START ALL 
PARTICIPATING PROCESSORS. SECTION 2 TESTS THE ABILITY OF A MULTI- 
PROCESSOR SYSTEM TO SUCCESSFULLY RECOVER FROM A POWER FAILURE 
EITHER IN A SELECTIVE SUBSYSTEM (MEMORY BOX OR PROCESSOR) OR ON 
A SYSTEM WIDE LEVEL DURING VARIOUS KINDS OF MEMORY AND I/O ACTIV- 
ITY. 

IN THE MULTIPROCESSOR MODE. ALL CPUS MUST ARRIVE AT THE 
ENTRY POINT TO SECTION 2 BEFORE ANY CPU WILL BEGIN SECTION 2 
TESTING. IF SECTION 1 IS NOT SHIPPED AND THE UN I BUS EXCERCISER 
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IS NOT BEING USED. THE OPERATOR MUST POWER FAIL EACH CPU 
MANUALLY THRU THE 16 TESTS OF SECTION 1 TO GET THE CPU TO THE 
ENTRY POINT OF SECTION 2. 

BEFORE STARTING THE PROGRAM, BE SURE THAT THE CPU POWER-UP 
ACTION SWITCHES (ON THE IIST FRONT PANEL) ARE ALL 
'*UN OF HALT", THE IIST ENABLE SWITCHES ARE ONLINE, AND 
THE IIST CONFIGURATION SWITCHES ARE EITHER ALL SYSTEM 0 OR 1 . 
ALL PARTICIPATING MEMORY BOXES SHOULD BE ONLINE TO ALL PARTIC- 
IPATING CPUS. 
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SWITCH REGISTER DEFINITIONS 

THE SWITCHES ARE DEFINED BY THE MASTER CPU ONLY, 
WHERE THE MASTER IS THE CPU THAT STARTS OR RESTARTS 
THE PROGRAM. EACH SLAVE CPU USES THE SWITCH DEFINITIONS 
OF THE MASTER. 

THE PROGRAM WILL NOT INTERPRET CHANGES TO THE 

SWITCHES IN MULTIPROCESSOR MODE WHILE THE PROGRAM IS RUNNING. 

PROGRAM MUST BE RESTARTED. 



THE 



SW15=1 



HALT ON ERROR 



SW14=1 
SW08=1 
SW07=1 
SW06=1 
SW05=1 
SW03=1 
SW02=1 
SW07=1 
SW00=1 

S8TTL BASIC DEFINITIONS 



LOOP ON TEST (SECTION 1 ONLY) 
ENABLE SYSTEM POWER FAIL TEST (TEST 25) 
DISABLE SECTION 1 TESTS (MULTIPROCESSOR MODE ONLY) 
ENABLE MULTIPROCESSOR MODE/SECTION 2 TESTS 

ENABLE UNIBUS EXERCISERS (SECTION 1 ONLY. EACH CPU MUST HAVE A UBE) 
TEST CPU #3 (IIST SELF ID). MULTIPROCESSOR MODE ONLY 
TEST CPU #2 
TEST CPU #1 
TEST CPU #0 



•INITIAL ADDRESS OF 



STACK 
KERSTK= 
SUPSTK= 
USESTK= 
•EOUIV 
.EQUIV 
PS= 
.EOUIV 
STKLMT= 
PIRO= 
DSWR= 
DDISP= 
LKS= 



13776 
STACK 
STACK-200 
STACK-300 
EMT. ERROR 
IOT .SCOPE 
177776 
PS.PSW 
177774 
177772 
177570 
177570 
177546 



THE STACK POINTER 

FIRST ADDRESS OF THE STACK 
KERNEL STACK 
SUPERVISOR STACK 
USER STACK 

BASIC DEFINITION OF ERROR CALL 
BASIC DEFINITION OF SCOPE CALL 
PROCESSOR STATUS WORD 

STACK LIMIT REGISTER 
PROGRAM INTERRUPT REQUEST REGISTER 
HARDWARE SWITCH REGISTER 
HARDWARE DISPLAY REGISTER 
LINE CLOCK (KW11-L) STATUS REGISTER 



.••MISCELLANEOUS DEFINITIONS 
HT= 11 
LF= 12 
CR- 15 
CRLF- 200 



CODE FOR HORIZONTAL TAB 

CODE LINE FEED 

CODE CARRIAGE RETURN 

CODE FOR CARRIAGE RETURN-LINE FEED 
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EG 0C1C 



; * GENERAL PURPOSE 
R0= 
R1 = 
R2= 
R3 
R4= 
R5- 
R6= 
R7= 



REGISTER DEFINITIONS 

XO ; ; GENERAL REGISTER 

*1 ; ; GENERAL REGISTER 

X2 .-.GENERAL REGISTER 

X3 ..GENERAL REGISTER 

X4 ; ; GENERAL REGISTER 
; ; GENERAL REGISTER 

*6 ; ; GENERAL REGISTER 

X? ;; GENERAL REGISTER 

.EQUIV R0.R10 ; ; GENERAL REGISTER 

.EQUIV R1.R11 ;; GENERAL REGISTER 

.EQUIV R2.R12 ;; GENERAL REGISTER 

.EQUIV R3.R13 ; .-GENERAL REGISTER 

.EQUIV R4.R14 ; ; GENERAL REGISTER 

.EQUIV R5,R15 .-.GENERAL REGISTER 

SP= Xt ; .-STACK POINTER 

.EQUIV SP.KSP ; ; KERNEL STACK POINTER 

.FQUIV SP.SSP .-.SUPERVISOR STACK POINTER 

.EQUIV SP.USP .-.-USER STACK POINTER 

PC= X7 ; .-PROGRAM COUNTER 

.-•PRIORITY LEVEL DEFINITIONS 



PRO- 
PR1 = 
PR2= 
PR3= 
PR4= 
PR5= 
PR6= 
PR 7= 



0 
40 
100 
140 
200 
240 
300 
340 



PRIORITY LEVEL 0 
PRIORITY LEVEL 1 
PRIORITY LEVEL 2 
PRIORITY LEVEL 3 
PRIORITY LEVEL 4 
PRIORITY LEVEL 5 
PRIORITY LEVEL 6 
PRIORITY LEVEL 7 



.-•"SWITCH REGISTER" SWITCH DEFINITIONS 



SW15= 


100000 


SW14= 


40000 


SW13= 


20000 


SW12= 


10000 


SW11 = 


4000 


SW10= 


2000 


SW09= 


1000 


SW08= 


400 


SW07= 


200 


SW06= 


100 


SW05= 


40 


SW04= 


20 


SW03= 


10 


SW02= 


4 


SW01 = 


2 


SWOO= 


1 


.EQUIV 


SW09.SW9 


.EQUIV 


SW08.SW8 


.EQUIV 


SW07,SW7 


.EQUIV 


SW06.SW6 


.EQUIV 


SW05.SW5 


.EQUIV 


SW04.SW4 


.EQUIV 


SW03.SW3 


.EQUIV 


SW02.SW2 



J 



MA1NDEC-1 1-CEkBG-C 
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169 
170 
171 
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seo ool ; 



17 2 
17S 

174 

V5 

176 

177 

178 

179 

180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 

211 

212 

213 

214 

215 

216 

217 

218 

219 

220 

221 

222 

223 

224 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



000004 
000010 
000014 
000014 
000014 
000020 
000024 
000030 
000034 
000060 
000064 
000100 
000114 
000240 
000250 



1 77740 
1 777^2 
1 77744 
177746 
177750 
177752 



.EOUIV SW01.SW1 

.EOUIV SWOO.SWO 

.••DATA BIT DEFINITIONS (B1T00 TO BIT15) 

BIT 15= 100000 

BIT14= 40000 

BIT 13= 20000 

BIT 12= 10000 

BIT11= 4000 

BIT 10= 2000 

BIT09= 1000 

BIT08= 400 

BIT07= 200 

BIT06= 100 

BIT05= 40 

BI T04= 20 

BIT03= 10 

BIT02= 4 

BIT01= 2 

BITOO= 1 

.EOUIV BJT09.8IT9 

.EOUIV BIT08.BIT8 

.EOUIV BIT07.BIT7 

.EOUIV BIT06.8IT6 

.EOUJV BIT05.8IT5 

.EOUIV BIT04.8IT4 

.EOUIV BIT03,BIT3 

.EOUIV BIT02.8IT2 

•EOUIV BIT01.8IT1 

.EOUIV BIT00.8IT0 



;»8ASIC 

ERRVEC= 

RESVEC= 

T8ITVEC: 

TRTVEC= 

BPTVEC= 

IOTVEC= 

PWRVEC= 

EMTVEC= 

TRAPVEC: 

TKVEC= 

TPVEC= 

LKVEC= 

CACHVED 

PIRQVEC= 

MMVEC= 

.S8TTL 



LOADRS 

HIADRS 

MEMERR 

CONTRL 

MAINT 

HITMIS 



"CPU" TRAP VECTOR ADDRESSES 

4 ;;TIME OUT AND OTHER ERRORS 

10 .^RESERVED AND ILLEGAL INSTRUCTIONS 

14 ;;'7"BIT 

14 ;; TRACE TRAP 

14 ; .-BREAKPOINT TRAP (8PT) 

20 ;; INPUT/OUTPUT TRAP (IOT) **SCOPE*« 

24 .-.POWER FAIL 

30 ; ; EMULATOR TRAP (EMT) "ERROR** 

34 ;;"TRAP" TRAP 

60 ; ; TTY KEYBOARD VECTOR 

64 ; ; TTY PRINTER VECTOR 

100 ;;LINE CLOCK (KW11-D VECTER 

:114 ;; CACHE ERROR INTERRUPT VECTOR 

:240 .-.PROGRAM INTERRUPT REQUEST VECTOR 

250 ;; MEMORY MANAGEMENT VECTOR 

CACHE REGISTER DEFINITIONS 



177740 
177742 
177744 
1 77746 
1 77750 
177752 



;; LOWER 16 BITS OF ADDRESS THAT CAUSED ERROR 

;; UPPER SIX BITS OF ADDRESS THAT CAUSED ERROR 

;; CACHE ERROR REGISTER 

; .-MEMORY CONTROL REGISTER 

; .-MEMORY MAINTENENCE REGISTER 

;;HIT MISS REGISTER "1" IMPLIES HIT IN CACHE 



CEOGC.PM 


1 3-MAR-80 


?25 




226 




227 




228 




229 


1 77760 


210 




231 


1 77762 


212 




ell 


177764 


234 


177766 


235 




216 




217 




238 




239 




240 




2^1 




242 




243 




244 


1 77572 


245 


177574 


246 


177576 


2*7 


172516 


248 




249 




250 




251 




252 




253 




254 




255 


1 77600 


256 


1 77602 


257 


177604 


258 


1 77606 


259 


177610 


260 


177612 


261 


177614 


262 


177616 


263 




264 




265 




266 


1 77620 


267 


1 77622 


268 


1 77624 


269 


1 77626 


270 


1 77630 


271 


1 77632 


272 


1 77634 


273 


1 77636 


274 




275 




276 




277 


177640 


2 '8 


177642 


279 


1 77644 


280 


177646 



PDP-11/70 
16:04 



SYSTEM POWER 
CACHE 



F 2 

FAIL MACY11 3OA<1052) 
REGISTER DEFINITIONS 
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,S8TTL CPU REGISTER DEFINITIONS 



SIZELO = 177760 

SI2EHI = 177762 

SYSTJD,= 177764 

CPUERR = 177766 



MEMORY SIZE REGISTER NUMBER TO PUT INTO A PAR 

TO GET TO THE LAST 32 WORDS OF MEMORY 

HIGH SIZE REGISTER, RESERVED FOR FUTURE USE 

CURRENTLY ALL ZERO 

SYSTEM ID REGISTER 

CPU ERROR REGISTER HOLDS CONDI T ION THAT CAUSED 
THE TRAP TO ERRVEC (000004) 



.S8TTL MEMORY MANAGEMENT DEFINITIONS 



.••MEMORY MANAGEMENT STATUS REGISTER ADDRESSES 



MMR0= 

MMR1 = 

MMR2= 

MMR3 = 

.EOUIV 

.EQUIV 

.EQUIV 

.EOUIV 



177572 

177574 

1 77576 

172516 

MMP.0.SR0 

MMR1,SR1 

MMR2,SR2 

MMR3.SR3 



•USER "1" PAGE DESCRIPTOR REGISTERS 



UIPDR0= 
UIPDR1= 
UIPDR2= 
UIPDR3= 
UIPDR4= 
UIPDR5= 
UIPDR6= 
UIPDR7= 



1 77600 
177602 
177604 
177606 
177610 
177612 
177614 
177616 



•USER ' D" 7 PAGE DESCRIPTOR REGISTORS 



UDPDRO= 
UDPDR1= 
UDPDR2= 
UDPDR3= 
UDPDR4= 
UDPDR5= 
UDPDR6= 
UDPDR7= 



177620 
177622 
177624 
177626 
1 77630 
177632 
177634 
177636 



.••USER "I" PAGE ADDRESS REGISTERS 

UIPAR0= 177640 
UIPAR1= 177642 
UJPAR2= 177644 
UIPAR3= 177646 



MAINDEC-11-CE*BG-C 



<"EKBGC.ei1 


1 5-MAR-80 


281 


1 77650 


282 


1 77652 


285 


1 77654 


284 


1 77656 


285 




286 




287 




288 


177660 


289 


177662 


290 


177664 


291 


177666 


292 


1 77670 


293 


177672 


294 


1 77674 


295 


1 77676 


296 




297 




298 




299 


172200 


500 


1 72202 


501 


1 72204 


502 


1 72206 


505 


172210 


504 


1 722 1 2 


505 


1 72214 


506 


1 72216 


507 




508 




509 




510 


1 72220 


511 


1 72222 


512 


1 72224 


515 


1 72226 


514 


1 72250 


515 


1 72252 


516 


172254 


517 


1 72256 


518 




519 




520 




521 


1 72240 


522 


1 722^2 


525 


1 72244 


524 


1 72246 


525 


1 72250 


526 


172252 


327 


1 72254 


528 


1 72256 


529 




550 




551 




f I -1 

352 


i rcdbO 


353 


1 72262 


534 


172264 


555 


172266 


356 


1 72270 



G 2 
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UIPAR4= 
UIPAR5= 
UIPAR6= 
UIPAR7= 



1 77650 
177652 
177654 
177656 



•USER "D" PAGE ADDRESS REGISTERS 



UDPAR0= 
UDPAR1= 
UDPAR2= 
UDPAR3= 
UDPAR4= 
UDPAR5= 
UDPAR6= 
UDPAR7= 



177660 
1 77662 
1 77664 
177666 
177670 
1 77672 
1 77674 
177676 



.-•SUPERVISOR "1" PAGE DESCRIPTOR REGISTERS 



SIPDR0= 
SIPDR1= 
SIPDR2= 
SIPDR3= 
SIPDR4= 
SIPDR5= 
SIPDR6= 
SJPDR7= 



172200 
1 72202 
172204 
172206 
172210 
172212 
172214 
172216 



.•SUPERVISOR "D" PAGE DESCRIPTOR REGISTERS 



SDPDR0= 
SDPDR1= 
SDPDR2= 
SDPDR3= 
SDPDR4= 
SDPDR5= 
SDPDR6= 
SDPDR7= 



172220 
\72222 
172224 
172226 
172230 
172232 
172234 
172236 



.-•SUPERVISOR "1" PAGE ADDRESS REGISTERS 

SIPAR0= 172240 
SIPAR1= 172242 
SIPAR2= 172244 
SIPAR3= 172246 
SIPAR4= 172250 
SIPAR5= 172252 
SIPAR6= 172254 
SIPAR7= 172256 

.-•SUPERVISOR "D" PAGE ADDRESS REGISTERS 



SDPAR0= 
SDPAR1= 
SDPAR2= 
SDPAR3= 
SDPAR4- 



1 72260 
1 72262 
172264 
172266 
1 72270 



MAINDEC-1 1-CEKBG-C PDP-11/70 
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337 

338 

339 

340 

34' 

5*2 

343 

3«.4 

345 

346 

547 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

573 

374 

375 

376 

377 

378 

379 

380 

581 

582 

583 

384 

385 

386 

587 

388 

389 

390 

391 

592 



1 72272 
^7227^ 
1 7227b 



1 7 2500 
1 72302 
1 72 304 
172306 
172310 
172312 
172314 
172316 



172320 
1 72122 
172324 
1 72326 
1 72330 
172332 
172334 
172336 



172340 
172342 
172344 
172346 
172350 
1 72352 
172354 
172356 



1 72360 
172362 
172364 
172366 
1 72370 
172372 
172374 
172376 



H i 

SYSTEM POWER FAIL MACYll 30A(105< 
MEMORY MANAGEMENT DEFINITIONS 

SDPAR5= ^72272 
SDPAR6^ 172274 
SDPAR7= 172276 



•KERNEL "I" PAGE DESCRIPTOR REGISTERS 
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<IPDRO= 
KIPDR1= 
KIPDR2= 
KIPDR3= 
KJPDR4= 
KIPDR5= 
KlPDR6= 
KIPDR7= 



1 72300 
172302 
172304 
1 72306 
172310 
172312 
172314 
172316 



; "KERNEL "0" PAGE DESCRIPTOR REGISTERS 



KDPDRO= 
KDPDR1= 
KDPDR2= 
KDPDR3= 
KDPDR4= 
KDPDR5= 
KDPDR6= 
KDPDR7= 



172320 
172322 
172324 
172326 
172330 
172332 
172334 
1 72336 



.•KERNEL "1" PAGE ADDRESS REGISTERS 



KIPAR0= 
KIPAR1= 
KIPAR2= 
KJPAR3= 
KIPAR4= 
KIPAR5= 
KJPAR6= 
KJPAR7= 



172340 
172342 
1 72344 
172346 
172350 
172352 
172354 
17235L 



•KERNEL '!>" PAGE ADDRESS REGISTERS 



KDPARO= 
KDPAR1= 
KDPAR2= 
KDPAR3= 
KDPAR4= 
KDPAR5= 
KDPAR6= 
KDPAR7= 



172360 
172362 
172364 
172366 
172370 
1 72172 
172374 
172376 



, S8TTL UNIBUS MAP REGISTER DEFINITIONS 



.-•THE LOWER 16 3ITS OF THE MAP REGISTERS ARE LABELED •MAPLXX' 
; * THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED 'MAPHXX ' 



»UiNDfcC-1 1 -CEKBG-C 



PDP-11 /70 SYSTEM POWER FAIL 



CEKBGC.PH 


13-MAR-80 16:04 


UN I BUS 


CWP REGI 


593 










594 


170200 


WAPLOO 




1 70?00 

1 f vc vv 


395 


1 70202 


HAPHOO 




i 70?o? 

i ' vc vc 


596 


170204 


HAPL01 




1 70?0£ 

1 ' VC V* 


397 


170206 


MAPH01 




1 70?0* 


398 


170210 


MAPL02 






399 


170212 


MAPH02 




1 70? 1? 

I r vc i C 


400 


170214 


MAPL03 


z 


170?1£ 
1 f VC 1 H 


401 


170216 


MAPH03 


Z 


1 70? 1 6 


402 


1 70220 


MAPL04 




1 70??0 


403 


1 70222 


KAPH04 


z 


1 70??? 
■ f vc c c 


404 


1 70224 


MAPL05 




1 70??£ 


405 


1 70226 


MAPH05 


_ 


1 70??6 

1 f vc C O 


406 


1 7023C 


MAPL06 






407 


1 70232 


MAPH06 






408 


1 70234 


MAPL07 




1 70? 34 


409 


1 70236 


MAPH07 





170? 36 

1 f vi. JU 


410 


1 70240 


NAPL10 


_ 


1 70?40 


411 


1 70242 


MAPH10 




170?4? 

1 f VC"*C 


412 


1 70244 


MAPL11 




1 f vc"" 


413 


1 70246 


MAPH11 




1 70?46 


414 


1 70250 


WAPL12 




1 70?50 

1 ' VC J v 


415 


1 70252 


MAPH12 




170?5? 

1 r VC -** C 


416 


1 70254 


MAPL13 




170?54 

1 » VC 


417 


1 70256 


MAPH13 




170?56 


418 


1 70260 


*APL14 




1 70260 


419 


1 70262 


MAPH14 


_ 


170?6? 

1 f vCwC 


420 


170264 


MAPL15 




170?64 

I » VCU^ 


421 


170266 


MAPH15 


_ 


170?66 

1 ' VCUw 


422 


1 70270 


MAPL16 




1 70270 

1 » VC ' V 


423 


1 70272 


MAPH16 




1 70272 

1 > VC * c 


424 


1 70274 


MAPL17 




1 70274 

1 » VC ' ~ 


425 


1 70276 


MAPH17 




170? 76 

i / VC » VJ 


426 


170300 


MAPL20 




1 70300 


427 


1 70302 


fWH20 


_ 


1 7030? 

1 ' VJVC 


428 


1 70304 


MAPL21 




1 70304 


429 


170306 


MAPH21 


_ 


170306 

I » VJVU 


430 


170310 


MAPL22 




170310 

1 f v J 1 V 


431 


170312 


1WPH22 




170312 

f ' V«^ 1 c 


432 


170314 


MAPI 23 




170314 


433 


170316 


MAPH23 




170316 

I ' V J 1 w 


434 


1 70320 


MAPL24 




1 703?0 


435 


1 70320 


MAPH24 


_ 


1 703?0 


436 


1 70324 


MAPL25 


_ 


1 70324 


437 


1 70326 


MAPH25 





1 70326 


438 


1 70330 


KAPL26 


_ 


1 70330 


439 


1 70332 


MAPH26 





17033? 

i ' VJJC 


440 


1 70334 


MAPL27 




1 70334 


441 


1 70336 


IWH27 




1 70336 


442 


170340 


MAPL30 


_ 


1 70340 


443 


170342 


MAPH30 




170342 


444 


1 70544 


MAPL31 




170344 


445 


170346 


MAPH31 




170346 


446 


170350 


MAPL32 




170350 


447 


170352 


MAPH32 




170352 


<.48 


1 70354 


MAPL33 




170354 



I 2 
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SrO 0021 



HAINDEC-1 1-CEKBG-C 



CEKBGC.P11 


1 3-MAR-80 


449 


70356 


450 


170360 


451 


1 70362 


452 


170364 


453 


170366 


454 


1 70370 


455 


1 70372 


456 


1 70374 


457 


1 70376 


458 




459 




460 




461 




462 




463 




464 




465 




466 




467 




468 




469 




470 




471 




472 




473 




474 


170016 


475 




476 




477 




478 




479 




480 




481 




482 




483 


rib rib A 

000000 


484 


rib rib \ 4 

000001 


485 


000002 


486 


^\ ^\ rib rib ^\ ^b 

000003 


487 


ri^ rib rib rib rib ri 

000004 


488 


ri\ ri«. *\ rib M 

000005 


489 


rib rib rib rib rib ri 

000006 


490 


rib rib rib rib rib 

000007 


491 


ri*. rib rib rib ri rib 

000010 


492 


rib A ri-l ^> rij •>> 

000015 


493 




494 




495 




496 




497 




498 




499 




500 




501 




502 


000001 


503 


000002 


504 


000004 
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SEQ 0022 



MAPH33 
MAPL34 
MAPH34 
MAPL35 
MAPH35 
MAPL36 
HAPH36 
HAPL37 
MAPH37 
.EQUIV 
.EQUIV 
.EOUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 



= 170356 

-- 170360 

= 170362 

= 170364 

= 1703O6 

= 170370 

= 170372 

= 170374 

r 170376 
MAPLOO,MAPLO 
MAPHOO.MAPHO 
HAPL01 .MAPL1 
MAPH01 .MAPH1 
MAPL02.MAPL2 
MAPH02,MAPH2 
MAPL03.MAPL3 
MAPH03,MAPHJ 
MAPL04,MAPL4 
MAPH04,MAPH4 
MAPL05,MAPL5 
MAPH05.MAPH5 
MAPL06.MAPL6 
MAPH06.MAPH6 
MAPL07.MAPL7 
MAPH07.MAPH7 
UBCR2=170016 



.S8TTL I JST REGISTER DEFINITIONS 



1 1ST INTERNAL REGISTERS 



PGTE 
PGCS 
STTE 
STCS 
IMSK 
PGF - 
STF = 
DCF = 
EXC - 
MTC = 



= 0 

: 1 

- 2 
= 3 
= 4 

5 

6 

7 

10 
15 



PROGRAM-GENERATED TRANSMISSION ENABLE 
PROGRAM-GENERATED CONTROL STATUS 
SANITY-TIMER TRANSMISSION ENABLE 
SANITY-TIMER CONTROL STATUS 
INPUT MASK 

PROGRAM GENERATED FLAGS 
SANITY-TIMER FLAGS 
DCLO/DISCONNECT FLAGS 
EXCEPTIONS 

MAINTAINANCE CONTROL 



;;IIST INTERRUPT VECTOR 



, SBTTL 



ONSOLE SWITCH SETTINGS 

; WHEN THESE SWITCHES ARE ENABLED. IT SPECIFIES TO THE MASTER 
; THAT THE CPU WITH THE 1 1 ST SELF ID CORRESPONDING TO THE 
;EQUIVILENT BIT POSITION IS EXPECTED TO PARTICIPATE IN THIS TEST 



CP0=8IT0 
CP1=8IT1 
CP2=BIT2 



;CPUO MASK LOCATION 
;CPU1 MASK LOCATION 
;CPU2 MASK LOCATION 



MAINDEC-1 1-CEKBG-C 



PDP-11/70 SYSTEM POWER FAIL 



MACY11 



c c yDr r D1 1 


i 1 mD_OA 1 4. - A/ 


CONSOLE 5WJTCH 5c Til 


cac 


AAAA1 A 

(XXX) 1 0 


CP3=8I T3 








cn7 

jUf 




; ; THt F0LL0 






;; TEST. 


C AQ 






ci n 

3 IU 


0001UU 


unci 1— D 1 

mpsw= sj To 


CI 1 


000040 


L8ESU= Bi T5 


CI j 

J If* 


AA1 AAA 

001000 


L0E= BIT9 


C1 7 


A / AAAA 

0*» 0000 


1 r\ t — n 1 t 1 y 

L0T= BJTlti 


CI/, 


1 AAAAA 


MAC — QTT1C 


CI c 

3 1 3 






J ID 






«.1 7 
j I f 






CI 0 




COTTI O IDA/ hculrr 

.SoTlL RJP0*t DfcVJCc 


C1Q 

) 17 


1 for UU 


Dord — 1 7Z. 7AA 

RPC51 = i f of 00 


JCAJ 




DDI If —1 7i7A1 


C01 
3C I 


I r Of U*t 


HrraA =1 rbrU 1 * 


co3 


1 7A7fl£ 


RPDA =ffO(0o 




1 7A7i n 
1 fOf 1 u 


DOrCO— 1 7Z71A 

RPC5<:-1 f Of 10 




1 7A71 5 

1 f Of I c 


RPD5 =lfOfl£ 


JCJ 


I 1 Of 1 «t 


nnrol —1 7/71 / 
RPfcRl=lfOf 1*1 




1 7A71A 
1 (Of 10 


DDAC — 17JL71/ 

KrMb =lf6fl0 


07 


I f Of cU 


DDI A -17i75A 

KPLA -i/OfcU 


JCO 


I f Of cc 


KPDo -l force 




I /Of c*> 


DDMD — 17A.70/ 
KrTTt - \fOfC l > 




1 f Of CD 


wpy i — i (0/ co 


?J 1 


I (Of jU 


DDCkJ — 17A77A 
KriN -IfOfOU 


J DC 


1 7A7^? 
I / Of jc 


Done -17A773 
KrUr — l f Of be 


5.77 


1 f O/ j*) 


DDftf* ,17/77/ 
RPDC =ifbfZ)H 


534 


1 76736 


RPfT =17(\7%(\ 

nrv, v. — I f gf jo 


535 


1 76740 


RPER2=1 76740 


536 


1 7674? 


RPER3=1 76742 


537 


1 76744 


RPEC1=1 76744 


538 


1 76746 


RPEC2=1 76746 



K 2 

30A(1052> 
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:CPU3 MASK LOCATION 



ENABLE FOR MULTIPROCESSOR CONFIGURATIONS 
ENABLE IF UNIBUS EXERCISER IS TO BE USED 
ENABLE FOR LOOPING ON ERRORS 
ENABLE FOR LOOPING ON TEST 
HALT ON ERROR 



CONTROL AND STATUS 1 
WORD COUNT REGISTER 
UNIBUS ADDRESS 

DESIRED SECTOR/TRACK ADDRESS 
CONTROL AND STATUS 2 
DRIVE STATUS 
ERROR REGISTER 1 
ATTENSION SUMMARY 
LOOK-AHEAD REGISTER 
DATA BUFFER REGISTER 
MAINTENANCE REGISTER 
DRIVE TYPE 

SERIAL NUMBER REGISTER 

OFFSET REGISTER 

DESIRED CYLINDER REGISTER 

CURRENT CYLINDER REGISTER 

ERROR REGISTER 2 

ERROR REGISTER 3 

ECC POSITION REGISTER 

ECC PATTERN REGISTER 



L 2 

HAINDEC-11-CEKBG-C PD°-11/70 SYSTEM POWER FAJL MACY11 30A(1052> 13-MAR-80 

CEKBGC.P11 13-MAR-80 16:04 POWER FAIL FUNCTION TABLE BIT DIFINITIONS 



16.04 PAGE 12 



539 

540 

541 

54? 

>43 

544 

545 

546 

547 

548 

549 

550 

551 

552 

553 

554 

555 

556 

557 000174 

558 000176 
559 

560 
561 
562 
563 
564 

565 000046 
566 

567 000052 

568 

569 

570 

571 

572 

573 

574 

575 000200 
576 

577 000220 

578 000224 
579 

580 

581 

582 

583 

584 

585 

586 

587 

588 

589 

590 

591 000024 
592 

593 000044 
594 



, S8TTL POWER FAIL FUNCTION TABLE BIT DIFINITIONS 



010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 



000000 



000174 
000000 
000000 



000200 
000046 
036112 
000052 
000000 
000200 



000230 
000024 
000200 
000044 
000230 
000230 



NCX=8IT12 
TI =8IT11 
NS =8IT10 
SID=8IT9 
SIU=8IT8 
SED=BIT7 
SEU=8IT6 
SSD=8IT5 
SSU=8IT4 
, S8TTL TRAP CATCHER 



;;DON.T SAVE MM REGISTERS 
;;TIME THE POWER FAIL 
;;DON'T PERFORM A REGISTER SAVf 
;;SEND ERROR ON ILLEGAL DOWN 
;;SEND ERROR ON ILLEGAL UP 
;;SEND ERROR ON DOWN 
;;SED ERROR ON UP 
;;SEND SIGNAL ON DOWN 
;;SEND SIGNAL ON UP. 



; *AL L UNUSED LOCATIONS FROM 4 - 776 CONTAIN A 'W.HAlT" 
.♦SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
.••LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
.=174 

DISPREG: .WORD 0 .-.-SOFTWARE DISPLAY REGISTER 

SWREG: .WORD 0 ;; SOFTWARE SWITCH REGISTER 

. S8TTL ACT11 HOOKS 



.-HOOKS REQUIRED BY ACT11 
$SVPC=. 
.=46 
SEND AD 

.=52 

.WORD 0 
.=$SVPC 



;SAVE PC 

;;1)SET L0C.46 TO ADDRESS OF SEND AD IN 

;;2)SET LOC.52 TO ZERO 
;; RESTORE PC 



,SEOP 



000200 

000137 020064 
000220 

004737 020000 
000137 020064 



. S8TTL LOAD START AND RESTART VECTORS 
.=200 

JMP STRT ;LOAD 200 WITH A JUMP TO START OF TEST 

.=220 

JSR PC, RESTRT ;LOAD 220 WITH A JUMP TO THE RESTART CODE 

JMP STRT 



.S8TTL APT PARAMETER BLOCK 

•ft************************************************************** 

SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

-•A************************************************************* 



.$X=. 

.=24 

200 

.=44 

SAPTHDR 

. .$X 



SAVE CURRENT LOCATION 

SET POWER FAIL TO POINT TO START OF PROGRAM 
FOR APT START UP 

POINT TO APT INDIRECT ADDRESS PNTR. 
POINT TO APT HEADER BLOCK 
RESET LOCATION COUNTER 



HAINOE 
CEKflGC 

595 
596 
59? 
598 
599 
600 
601 
602 
603 
604 
605 



C-11-CEKBG-C 
.P11 13-MAR-80 



000230 
000230 
000232 
000234 
000236 
000240 
000242 



000000 
014336 
000000 
000000 
000000 
000052 



PDP-11 /?0 SYSTEM POWER FAIL MACY11 
16:04 APT PARAMETER BLOCK 



M 2 

30A(1052) 



13-MAR-80 16:04 PAGE 13 



SEQ 0025 



; ?£l£r£I c^ fTER BL0CK AS DEFINED IN THE APT-PDP1 1 DIAGNOSTIC 
.■INTERFACE SPEC. 



SAPTHD: 

SHI67S: .WORD 

SMSADR: .WORD 

$ T S TM : .WORD 

SPASTM: .WORD 

tUNITfl: .WORD 
.WORD 



0 ;;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

SMAIl ; .'ADDRESS OF APT MAILBOX (BITS 0-15) 
RUN TIM OF LONGEST TEST 

IN SECS * 0F 1ST PASS °N 1 UN 11 <0U JCK VERIFY) 
ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
SETEND-$MAIL/2 ;. -LENGTH MAIL80X-ETA8LE (WORDS) 



MAINDEC-11-CEKBG-C 



PDP-11/70 SYSTEM POWER FAIL 



CEKBGC.P11 


l 5-MAR-BO 1 6 : 04 




TAGS 




606 






CO T Ti 

•SoTiL 


COMMON 


TAGS 


607 












608 












609 






; * THJ 5 


TABLE CONTAINS 


610 






; *U5cD 


IN THE PROGRAM. 


611 












612 




A1 / AAA 

Ul*iOOU 




1 / f\f\f\ 

.=14000 




613 


014000 










614 


014000 


AAAAAA 

oooooo 




.WORD 


0 


615 


014002 


aaa 
000 


5TSTNM: 


.BYTE 


0 


616 


014003 


AAA 

OOU 




.8Y Tt 


A 

0 


617 


014004 


AAA 

000 




• BYTE 


A 

0 


618 


014005 


AAA 

000 




.BYTE 


A 
0 


619 


014006 


AAA 

000 


frnr i f . 


.QYTt 


A 
U 


620 


014007 


AAA 

000 




• BYTE 


A 
U 


621 


014010 


AAA 

000 




• BYTE 


A 
0 


622 


014011 


AAA 

000 




• BY IP 


A 
U 


623 


014012 


AAAAAA 

000000 


« r fMT • 
»J LIMI . 


1 AAAA 
• WORD 


A 
U 


624 


014014 


AAAAAA 

000000 




.WORD 


A 
0 


625 


014016 


AAAAAA 

000000 




.WORD 


A 
0 


626 


014020 


AAAAAA 

oooooo 




.WORD 


A 
0 


627 


014022 


AAAAAA 

oooooo 


»LrAUR . 


.WURU 


A 
0 


628 


014024 


AAAAAA 
UUUUV.HJ 




1 ATLD A 

.WURU 


A 
U 


629 


014026 


AAAAAA 

oooooo 




.WURU 


A 

u 


630 


014030 


AAAAAA 

uuuuuu 




.WORD 


A 

u 


631 


014032 


AAAAAA 

OOOOOO 


»L"tRR : 


.WURU 


A 

0 


632 


014034 


AAAAAA 

OOOOOU 




1 AAA A 

.WURU 


A 

u 


633 


^4036 


AAAAAA 
OOOOOO 




1 AAAA 

• WURU 


A 

0 


634 


014040 


AAAAAA 
OOOOOO 




.WURU 


A 

u 


635 


014042 


AAAAAA 

uuuuuu 


CCDTTI - 


.WURU 


A 

u 


636 


014044 


AAAAAA 

OOOOvA) 




.WURU 


A 

0 


637 


014046 


AAAAAA 
OOOOOU 




.WURU 


A 
0 


638 


014050 


AAAAAA 

uououu 




.WURU 


A 
0 


639 


014052 


AAAAAA 

uouuuu 




l kAA f\ 

.WURU 


A 

0 


640 


014054 


AAA 

uuu 


c r T CMC . 


Q V TC 

• BY \ t 


A 

0 


641 


014055 


AAA 

UUU 




DVTC 

.or 1 1 


A 
0 


642 


014056 


AAA 

UUU 




D V TC 

• BY It 


A 
U 


643 


014057 


AAA 
UUU 




DV TC 

.or 1 1 


A 
U 


644 


014060 


AA1 
UU 1 


tCOMAV - 

JtKTvvl : 


DVTC 


1 
I 


645 


014061 


AA1 
UU I 




QVTL 

.or 1 1 


1 


646 


014062 


AA1 
UU I 




DVTC 

• or 1 1 


1 
I 


647 


014063 


AA1 
UU I 




DVTC 

.or 1 1 


1 


648 


014064 


AAAAAA 
UUUOOU 


CCODDf . 

»tKRrT : 


.WURU 


A 
U 


649 


014066 


AAAAAA 
UUU UUU 




.WURU 


A 

u 


650 


014070 


AAAAAA 

uuuuuu 






A 

V 


651 


014072 


AAAAAA 
UUUUUU 




.WORD 


0 


652 


014074 


AAAAAA 

UUUUUU 


»tnr<c>": 


.WORD 


0 


653 


014076 


AAAAAA 
UUUUUU 




.WORD 


0 


654 


014100 


AAAAAA 




.WORD 


0 


655 


014102 


AAAAAA 




.WORD 


0 


656 


014104 


AAAAAA 
UUUUUU 


»uU«UR : 


.WORD 


0 


657 


014106 


oooooo 

www 




.WORD 


0 


658 


014110 


oooooo 




.WORD 


0 


659 


014112 


oooooo 




.WORD 


0 


660 


014114 


oooooo 


S8DADR: 


.WORD 


0 


661 


014116 


oooooo 




.WORD 


0 



N 2 

MAC Y1 1 3OAU052) 



13-MAR-80 '6-04 PAGE H 



SEQ 0026 



;; START OF COMMON TAGS 

;; CONTAINS THE TEST NUMBER 

.-/CONTAINS ERROR FLAG 

;; CONTAINS SUBTEST ITERATION COUNT 

;; CONTAINS SCOPE I OOP ADDRESS 

;; CONTAINS SCOPE RETURN FOR ERRORS 

.-.-CONTAINS TOTAL ERRORS DETECTED 

;; CONTAINS ITEM CONTROL BYTE 

;; CONTAINS MAX. ERRORS PER TEST 

.-.-CONTAINS PC OF LAST ERROR INSTRUCTION 

.-.-CONTAINS SP OF CPU IN ERROR 

;; CONTAINS ADDRESS OF 'GOOD' DATA 

;; CONTAINS ADDRESS OF 'BAD' DATA 



MA1NDEC 


-1 


l-CEKBG-C 


PDP-1V 7 0 SYSTEM POWER 


rill 

FAIL 


CLK8GC.P1 


1 1 3-MAB-80 


16:04 




COMMON 


TATC 

TAGS 


662 

Que 


o 


14120 


000000 

VWvW 








.WORD 




0' 




000000 

www 








.WORD 


*A4 


0 4 

V/ 


4124 


000000 

WWW 






$GDDAT: 


.WORD 


665 


0' 


4126 


000000 

www 








.WORD 


666 


0' 


4130 


000000 

vwvw 








. WUHD 


667 


0" 


41 32 


000000 

www 








.WORD 


AAA 


0 1 


41 34 


000 

wv 






1E0PSG: 


DvTC 
.OTIC 




0' 


4135 


000 

wv 








.BYTE 


670 


01 


4136 


000 

WV 








□ vTC 

.or ft 




01 


4137 


000 

Wv 
























.WORD 




01 


4140 


000000 

www 






58DDAT: 


674 




4142 


000000 

V\rW W 








.WORD 


675 


01 


4144 


000000 

V www 








.WORD 




01 


4146 


000000 

www 








.WORD 


677 


01 


4150 


000000 

www 








.WORD 


678 


01 


4152 


000000 

V W W V 








.WORD 


679 


01 


4154 


ooo 






JAUT08: 


.8Y I E 


680 


01 


4155 


000 






SINTAG: 


.BYTE 


681 


01 


4156 


000000 

www 








.WORD 


682 


0' 


4160 


177570 






SUR: 


i mor\ 

.WORD 


683 


01 


4162 


177570 








.WORD 


684 


01 


4164 


177570 








. WORD 


685 


01 


4166 


177570 








.WORD 


686 


01 


4170 


177570 






DISPLAY 


.WORD 


687 


0' 


4172 


177570 








.WORD 


688 


01 


41 74 


177570 








.WORD 


689 


01 


4176 


177570 








• WORD 


690 


0' 


4200 


013776 






SSSTP: 


.WORD 


691 


0' 


4202 


01 1 7 76 








.WORD 


692 


0' 


4204 


007776 








.WORD 


693 


0' 


4206 


0C3776 








.WORD 


694 


0' 


4210 


1 77560 






STKS: 


1 77CA.fi 

1 f O60 


695 


01 


4212 


1 77562 






STKB: 


1 77CA'3 

1 f Ooc 


696 


0' 


42H 


1 77564 






$TPS: 


l f 064 


697 


0' 


4216 


177566 






$TP6: 




698 


0' 


4220 


000 






SNULL : 


DuTC 

.BY ft 


699 


0' 


4221 


002 






$FILLS: 


DuTC 


700 


0" 


4222 


012 






SFILLC: 


.BYTE 


701 


0' 


1 4223 


000 






STPFLG: 


B W T"C 

.OTIC 


702 


0' 


4224 


000000 






SERGBL : 


.WORD 


703 


01 


4226 


177777 






SCPUID: 


.WORD 


704 


0' 


4230 


177777 








.WORD 


705 


0' 


1 4232 


1 77777 








.WORD 


706 


0' 


4234 


1 77 7 77 








.WORD 


707 


0 1 


4236 


oooooo 






WE GAD: 


.WORD 


708 
















709 


o 


1 4240 


000000 


oooooo 


000000 


SREGO: 


.WORD 


710 


o 


14246 


oooooo 










711 


0' 


4250 


oooooo 


A M A A A A 

oooooo 


A A **V A A 

oooooo 


SREG1 : 


• WORD 


712 


0 


14256 


oooooo 










713 


0' 


4260 


oooooo 


oooooo 


oooooo 


SPEG2: 


.WORD 


714 


0 


14266 


oooooo 










715 


0 


4270 


oooooo 


oooooo 


oooooo 


SREG3: 


.WORD 


716 


0 


14276 


oooooo 










m 


0 


4300 


oooooo 


oooooo 


oooooo 


SREG4: 


.WORD 



B 3 

MAC Y1 1 30A(1052) 13-MAR-80 16:04 PAGE 15 



SE0 0027 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

0 
0 
0 
0 

c 

0 
0 
0 
0 

DSWR 

DSWR 

DSWR 

DSWR 

DDJSP 

DDJSP 

DDISP 

DDJSP 

STACK 

STACK-2000 
STACK-4000 
STACK-10000 



0 
2 

12 

0 

0 

-1 

-1 

-1 

- I 

0 



;; CONTAINS 'GOOD' DATA 



;;THIS TABLE HOLDS THE END OF PASS 



;; CONTAINS 'BAD' DATA 



; .'RESERVED — NOT TO BE JSED 

.-.AUTOMATIC MODE INDICATOR 
;; INTERRUPT MODE INDICATOR 

.-.ADDRESS OF SWITCH REGISTER 



;; ADDRESS OF DISPLAY REGISTER 



; S TACK INITIALIZATION FOR CPU0 

; '"' CPU1 

... QFv2 

... cpu3 

; TTY KBD STATUS 
; TTY KBD BUFFER 

; TTY PRINTER STATUS REG. ADDRESS 

; TTY PRINTER BUFFER REG. ADDRESS 

; CONTAINS NULL CHARACTER FOR FILLS 

; CONTAINS # OF FILLER CHARACTERS REQUIRED 

.INSERT FILL CHARS. AFTER A "LINE FEED" 

."TERMINAL AVAILABLE" FLAG (BI T<07>=0=YES) 

.THIS TABLE HOLDS THE PHYSICAL ID OF 
; THE PARTICIPATING PROCESSORS ARRANGED 
;JN LOGICAL ORDER. 



;; CONTAINS THE ADDRESS FROM 

.-.WHICH (SREGO) WAS OBTAINED 
0.0.0.0 .-.-CONTAINS (($REGAD)*0*6) 

0.0,0.0 .-.CONTAINS (($REGADW*6> 

0.0.0,0 ;; CONTAINS ( (SREGAD) *4*6) 

0.0.0.0 .-.CONTAINS (($REGAD)*6*6) 

0.0,0.0 .-.-CONTAINS (($REGAD)*10*6) 



MAlNDEl -1 1-CEKBG-C POP- 1 1/70 

CEKBGC.P11 13-MAP-80 16:04 



SYSTEM POWER FAIL 
COMMON TAGS 



718 0K506 

719 0H310 

720 0H312 

721 0H3K 
72? OH 31 6 

723 OH 320 

724 0H322 

725 014324 

726 0H326 

727 0H330 

728 0H332 

729 01 ',333 

730 OH 334 
731 

732 
733 
734 
735 

736 0H336 

737 0H336 

738 014340 

739 014342 

740 OH 344 

741 014346 

742 0H350 

743 014352 

744 014354 

745 014356 

746 014356 

747 014357 

748 014360 

749 014362 

750 014364 
751 

752 
753 
754 
755 
756 

757 0H366 

758 014367 
759 

760 
761 
762 

763 014370 
764 

765 0H372 

766 014373 

767 0H374 

768 014376 

769 014377 

770 014400 

771 0H402 

772 0H403 

773 0H404 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
077 
015 
000012 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 
000000 
000000 
000000 



000 
000 



000000 

000 
000 

000000 
000 
000 

000000 
000 
000 

000000 



STMPO: 
STMP1 
STMP2: 
STMP3: 
STMP4: 

$ESCAPE 



SOUES: 
SCRLF : 
$LF: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
0 

.WORD 
.WORD 
.WORD 
ASCII 



HAcm 



o 
o 
o 

0 
0 

0 
0 
0 

/?/ 



C 3 
30AH052) 



.ASCII <15> 
.ASCIZ <12> 



13-MAR-80 16:04 PAGE 16 



USER DEFINED 
USER DEFINED 
USER DEFINED 
USER DEFINED 
USER DEFINED 
ESCAPE ON ERROR ADDRESS 



QUESTION MARK 
CARRIAGE RETURN 
LINE FEED 



G 00?8 



.S8TTL APT MAI LBOX-E TABLE 



.EVEN 

SMAIL: 

SMSGTY 

SFATAL 

STESTN 

SPASS : 

SDEVCT: 

SUNIT: 

SMS GAD: 

SMSGLG: 

$E TABLE 

SENV: 

SENVM: 

SSWREG: 

SUSWR: 

SCPUOP: 

• * 

4 

■ » 
* 

• * 

SMAMS1: 
SMTYP1 : 

• * 

m 

• * 
* 

■ » 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
• WORD 

.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 



AMSGTY 

AFATAL 

ATESTN 

APASS 

ADEVCT 

AUNIT 

AMSGAD 

AMSGLG 

AENV 

AENVM 

ASWREG 

AUSWR 

ACPUOP 



.BYTE 
.BYTE 



AMAMS1 
AMTYP1 



SMADR1 : .WORD AMADR1 



SMAMS2 
SMTYP2 
SMADR2 
SMAMS3 
SMTYP3 
SMADR3 
SMAMS4 
SMTYP4 
SMADR4 



.BYTE 
.BYTE 
.WORD 
.BYTE 
.BYTE 
.WORD 
.BYTE 
.BYTE 
.WORD 



AMAMS2 
AMTYP2 
AMADR2 
AMAMS3 
AMTYP3 
AMADR3 
AMAMS4 
AMTYP4 
AMADR4 



APT MAILBOX 
MESSAGE TYPE CODE 
FATAL ERROR NUMBER 
TEST NUMBER 
PASS COUNT 
DEVICE COUNT 
I/O UNIT NUMBER 
MESSAGE ADDRESS 
MESSAGE LENGTH 
APT ENVIRONMENT TABLE 
ENVIRONMENT BYTE 
ENVIRONMENT MODE BITS 
APT SWITCH REGISTER 
USER SWITCHES 
CPU TYPE. OPTIONS 
BITS 15-11=CPU TYPE 

1 1 /04=01 , 1 1 /05=02. 1 1 /20=03 . 1 1 /40=04 . 1 1 /45=05 
11/70=06,PDQ=07.0=10 
BIT 1 0=REAL TIME CLOCK 
BIT 9=FL0ATING POINT PROCESSOR 
BIT 8=MEM0RY MANAGEMENT 
;;HIGH ADDRESS .M.S. BYTE 
;;MEM. TYPE.8LK#1 
MEM. TYPE BYTE — (HIGH BYTE) 
900 NSEC C0RE=001 
300 NSEC BIP0LAR=002 
500 NSEC MOS-003 
* 'HIGH ADDRESS BLK#1 

"MEM.LAST ADDR.=3 BYTES. THIS WORD AND LOU OF -TVPf" ABOVE 
HIGH ADDRESS, M.S. BYTE 
MEM. TYPE .8LK#2 
MEM.LAST ADDRESS. BLK*2 
HIGH ADDRESS .M.S. BYTE 
MEM. TYPE ,81K#3 
MEM.LAST ADDRESS. BLK# 3 
HIGH ADDRESS. M.S. BYTE 
MEM. TYPE .8LK#4 
MEM.LAST ADDRESS. BLK#4 



nAINCE ( 



-CEK.80-C 



PDP-11/70 SYSTEM POWER FAIL 



MACY11 3C 



C f KBGC . 


pi i 1 3-MAR-80 


16:04 


774 




VAAAAA/ 




775 


ni / /ift 


VAAAAAJ 




776 


U I l c 






777 


01Z.Z.1Z. 


WWW 




778 


U I I o 


www 




779 




oooooo 

VAAAAA/ 




780 




www 




781 


014434. 


OOOOOO 




782 




oooooo 

WWW 




783 


01 44 VI 


OOOOOO 

VAAAAA/ 




784 


O144X3 


VAAAAA/ 




785 


m / (.v. 
u i * *y* 


[VVVVV1 
VAAAAA/ 




786 


ni44 v» 


OOOOOO 

WWVA/ 




787 


014440 


oooooo 

VAAAAA/ 




788 


01 444? 


VAAAAA/ 




789 


014444 

V/ 1 •••••••• 


000000 
WWvV 




790 


01 444 A 


000000 




791 


ni44*»o 


oooooo 

VAAA/W 




792 


01445? 


oooooo 

VAAAAA/ 




793 


0144S4 

V 1 •••• J** 


oooooo 




794 


01445A 


oooooo 

WvWV 




795 


0144*0 


oooooo 

UWWV 




796 








797 








798 


01446? 






799 








800 


oi44*? 


oooooo 

VAAAAA/ 


oooooo 


801 


014470 


oooooo 

WWW 


oooooo 


80? 


01 £4 7ft 


oooooo 


oooooo 


803 


01450? 


oooooo 

VAAAAA/ 


oooooo 


804 


014510 


oooooo 

VAAAAA/ 


a y\ y-v a a 

oooooo 


805 




oooooo 

www 


A XX y-V A A 

oooooo 


806 


0145?? 


oooooo 

www 




807 




oooooo 

VAAAAA/ 




808 




oooooo 

VAAAAA/ 




809 


0145^0 


oooooo 

VAAAAA/ 




810 


01453? 


oooooo 

VAAAAA/ 




811 




oooooo 

VAAAAA/ 




81? 


0145Vi 


oooooo 

VAAAAA/ 




813 


014540 


oooooo 

VAAAAA' 




8H 


01454? 


oooooo 

VAAAAA/ 




815 


014544 


oooooo 

VAAAAA/ 




816 


01454A 


oooooo 

VAAAAA/ 




817 


014550 


oooooo 

VAAAAA/ 




818 


01455? 


oooooo 

VAAAAA/ 


oooooo 


819 


014560 


oooooo 

VAAAAA/ 




820 


01 4 SAP 

V 1 H JUL 


oooooo 

www 


oooooo 


821 


014570 


oooooo 

VAAAAA/ 




822 








823 


014572 


oooooo 


oooooo 


824 


014600 


oooooo 




825 


0H602 


oooooo 


oooooo 


826 


014610 


oooooo 




827 


014612 


oooooo 


oooooo 


828 


014620 


oooooo 




829 


014622 


oooooo 


oooooo 



oooooo 
oooooo 

oooooo 
oooooo 



APT MAI U30X-E TABLE 


tVECTI : 


UORD 


AVECT1 


SVECT2: 


JORD 


AVECT2 


SBASE 




UORD 


ABASE 


SDEVM 




UORD 


ADEVfl 


SCDW1 




UORD 

• WV*v 1/ 


ACDW1 


SCDW2 




JORD 

• wvn i/ 


ACDW2 


SDDWO 




UORD 


ADDWO 


SDDWl 




.UORD 


ADDW1 


SDDU2 




UORD 


ADDW2 


SDDW3 




.UORD 


ADDW3 


SDDW4 




!u0RD 


ADDW4 


SDDW5 




!u0RD 


ADDW5 


S0DW6 




!u0RD 


ADDW6 


SDDW7 




WORD 

• W\/» 


ADDW7 


SDDW8 




UORD 


ADDW8 


SDDW9 




.UORD 


ADDW9 


SDDW10: 


.WORD 


ADDW10 


SDDW1 1 : 


.UORD 


ADDW11 


SDDW12: 


.WORD 


ADDW12 


IDDW13: 


.WORD 


ADDW13 


SDDWK : 


.WORD 


ADDWU 


SDDU1 5 : 


.WORD 


ADDW15 



tETEND: 
STOP: 



0.0.0.0.0.0.0,0 



START: 0.0.0.0.0.0.0,0 



000000 
000000 



PWRFL : 

YYY : 

BOOT : 

PATCHK: 

HIC0RE: 

REL0UP: 

RtLODN: 

EXIT: 

ENTR22: 

ENTR23: 

ENTR24 : 

HIBOX: 

SAVR6: 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

0.0.0.0 



ROUTE: 0.0.0.0 



000000 SAV6 

000000 FLAG 

000000 PFFT 

000000 PFDT 



0.0.0.0 
0,0.0.0 

.WORD 0.0.0.0 
.WORD 0.0,0.0 



,(1052) 13H1AR-80 16:04 PAGE 17 

SE0 0029 

INTERRUPT VECTORS, BUS PRIORI TY#1 
INTERRUPT VECT0RJT2BUS PRIORITY^ 
BASE ADDRESS Of EQUIPMENT UNDER TEST 
DEVICE MAP 

CONTROLLER DESCRIPTION W0RD4H 
CONTROLLER DESCRIPTION W0RD#2 
DEVICE DESCRIPTOR WORD#0 
DEVICE DESCRIPTOR W0RD4H 
DEVICE DESCRIPTOR W0RD#2 
DEVICE DESCRIPTOR W0RD*3 
DEVICE DESCRIPTOR W0RD#4 
DEVICE DESCRIPTOR W0RD#5 
DEVICE DESCRIPTOR W0RD#6 
DEVICE DESCRIPTOR W0RD#7 
DEVICE DESCRIPTOR W0RD#8 
DEVICE DESCRIPTOR W0RD*9 
DEVICE DESCRIPTOR WORD#10 
DEVICE DESCRIPTOR W0RDJ11 
DEVICE DESCRIPTOR W0RD#12 
;DEVICE DESCRIPTOR W0RD#13 
DEVICE DESCRIPTOR W0RD#K 
:DEVICE DESCRIPTOR W0RD#15 



.MEM BOX UPPER BOUND ADDRESS TABLE 



;MEM BOX STARTING ADDRESS TABLE 



;=0 DON'T EXPECT CPU POWER FAIL.=1 EXPECT IT 

.ERROR ROUTINE U0RK LOC 

;=0 DON'T EXPECT CPU BOOT. -1 EXPECT IT 

;=0 WRITE AND CHECK MEM PATTERN. =1 CHECK ONLY 

;=1 TURN ON MM ON POWER-UP 

;=0 DON'T ReL0CATE.=l RELOCATE 

;=0 DON'T RELOCATE. =1 RELOCATE 

;=0 DON'T EXIT. =1 EXIT TEST 

.CONTROL ENTRY INTO TEST 22 

.•CONTROL ENTRY INTO TEST 23 

; CONTROL ENTRY INTO TEST 24 

.RELOCATE TO THIS MEM BOX 

;A PLACE TO SAVE A REGISTER 

; TYPE TRAP ROUTE TABLE 



.SOME PLACE TO PUT THE SP 
.INSTRUCTION DOWN FLAG 
; ; POWER FAIL FUNCTION TABLE 
; .POWER FAIL DURATION TABLE 



MAINDEC-1 1 -CEKBG-C PDP-1V70 SYSTEM POWER FAIL MACYl 1 30A<1 



Cf KBGC . 


P1 1 1 3-MAR-80 


16:04 




APT MAI LS0X-E TABLE 


830 


u iho yj 


(WYWl 










0 0 0 0 


851 


U 1 HO JC 


fWVYWl 
UWWv 


OOOOOO 


OOOOOO 


rial/ j w . 


ljopd 

• m\Jr\ls 


83? 


U I hOmU 


WVUUv 












833 


U I hOmc 


lYYVVVl 
IAAAAA/ 








o 




834 


\J 1 HOHH 


oooooo 

VA/VAA/v 






<;i v FD • 


UORD 


o 

V 


83S 


\J > hOhO 


OOOOOO 










o 


836 




OOOOOO 


000000 


000000 






0,0.0.0 


837 


\J 1 HO JO 


OOOOOO 
IAAA/W 












838 


O1£660 

v I HOOv 


OOOOOO 










o 


839 


01 £66? 
\J 1 HOOc 


OOOOOO 

VWUW 


OOOOOO 


OOOOOO 


p(jp T AO 


UORD 


0 0 0 0 


840 


\J 1 HO' V 


OOOOOO 
UWWv 












841 


ni467? 

U 1 HOf c 


OOOOOO 
www 


OOOOOO 


000000 


1 Jl 1 ID • 


UORD 


0 0 0 0 

V 0 V 0 V 0 \.' 


842 


(VI 4 700 

U 1 H f W 


OOOOOO 










0 0 0 0 


843 


U 1 H f \JC 


OOOOOO 


000000 


oooooo 


FRRTAft 


UORD 


844 


014710 

V 1 H f IU 


OOOOOO 












545 


01471 ? 


OOOOOO 

Www 






^YMf 1 


UORD 


o 


846 


014714 


OOOOOO 

WWW 






SYNf ? 


UORD 


o 


847 


0l471h 


001000 






T YPQUE 




1000 

1 wv 


848 


01^71* 

V 1 SJ f i u 


OOOOOO 

wvwv 






S?l 0G1 


.WORD 


o 


849 


0167?0 


OOOOOO 

V/vVWv 






c?i 0G2 


!w0RD 


o 


850 




OOOOOO 

VvWwV 






f 1 • 

L 1 • 


iwORD 


o 


851 


01*7?£ 


OOOOOO 






c?- 


!w0RD 


o 


852 


0167?6 


000000 

www 






D1 : 


!w0RD 


o 


853 


016730 


OOOOOO 

www 






D2- 


WORD 

• WV*AL/ 


o 


854 


01673? 


OOOOOO 






F1 • 


0 • 

V 




855 


v l U' 


OOOOOO 

UVWVV 






E2: 


o 




856 


V IU' JO 


000 
vw 






FLAGS: 


.BYTE 


o 


857 


016737 


000 

wv 






MPF : 


.BYTE 


o 


858 


016740 

V 1 sj f "•V/ 


OOOOOO 






U8EF: 


.WORD 


o 


859 


01674? 

VlU' HC 


OOOOOO 


OOOOOO 


/S S\ y-» /-fc 

OOOOOO 


RPPGM: 


.WORD 


0 0 0 0 

V 0 \J 0 V 0 V 


860 


016750 


OOOOOO 

www 












861 


016752 

V IU' Jt 


000000 

VWWV 






LOOPS: 


.WORD 


0 

V 


862 


016754 

V 1 u * J™ 


OOOOOO 
vwwv 






COUNT0: 0 




863 


v I U f JO 


000000 
wvwv 






C0UNT1 


0 




864 


oi^7ao 

v IU' Uv 


OOOOOO 
www 






C0UNT2 


0 




865 


016762 


000000 

www 






C0UNT3 


• 0 




866 


016764 

V 1 V ' V^ 


OOOOOO 

www 






L0G1 : 


.WORD 


o 

V 


867 


016766 

V ■ U ' Uw 


000000 

vwwv 






L0G2: 


.WORD 


o 


868 


016770 

VlU' » V 


000000 

www 






CPULS1 


■ .WORD 


o 


869 


016772 


OOOOOO 

www 






EXTRA: 


0 




870 


016774 


000001 

WWW 1 






CPUACT 


: 1 




871 


016776 


000001 

VWw 1 






SYNC. 3 


: 1 




872 


017000 

V/ 1 f WW 


000001 

VWW 1 






INTMSK 


: 1 




873 


01700? 

V 1 ' WL 


000001 

VWW 1 






ERRLCK 


• 1 




874 


017004 


000001 

VWW 1 






C3: 


1 




875 


017006 

V 1 ' vw 


000001 

VWW 1 






D3: 


1 




876 


017010 

V 1 t V 1 V 


000001 

VWW 1 






E3: 


1 




877 


01 701 P 

VI ' vlt 


000001 

VWW 1 


000001 


000001 


NOPRMP 


■ 1.1.1.1 




878 


01 7020 

V ■ • vL v 


000001 

VWW 1 












879 


017022 


000001 






UBELCK 


: 1 




880 


017024 


000001 






TQL1 : 


1 




881 


017026 


000001 






S2L1: 


• WORD 


1 


882 


017030 


177500 






ACR: 


1 77500 




883 


017032 


177502 






ADR: 


1 77502 




884 


017034 


000260 






ISTVEC 


: 260 




885 


017036 


177777 






FIRST: 


.WORD 


-1 



3 

2) 13-MAR-80 16. -Oh PAGE '8 



SEQ 0030 



.-.-'•lASSBUS DEVICE SELECTION WORD 

.•POWER ROUTINE SIGNAL 
;;THIS WORD HOLDS ACTUAL LOG. ID. 
.•NUMBER OF BOXES OF MK11 MEMORY 
.•CHECKSUM TABLE 

.•PSEUDOSWITCH REGISTER 
;P0WERFAIL DISPATCH TABLE 

; 1 1ST DISPATCH TABLE 

;CPU ERROR VECTOR DISPATCH TABLE 

.•SEMAPHORE 
; SEMAPHORE 

.MESSAGE POINTER AREA 
; LOG-IN LOCK 
; LOG-OUT LOCK 

;;A-F0RK CONTROL VARIABLES 



.■MULTIPROCESSOR FLAG 

;UBE FLAB t 

; SHARED RP04 DRIVE TABLE 

;# OF LOOPS REQUIRED ON POWER DOWN 
.-TIME CPU POWER-DOWN 



ENTRY CONTROL LOGS 

NUMBER OF ACTIVE SLAVE CPU'S 
EST. INITIAL PART OF PUR DUN TIME 
CPUS UNDER TEST 
SEMAPHORE 

II ST INTERRUPT ENABLE BIT 
ERROR ROUTINE SEMAPHORE 
A-F0RK CONTROL VARIABLES 



=1 DON'T TYPE CPU IDENTIFICATION 

U8E SEMAPHORE 
TYPE SEMAPHORE 
INITIALIZATION SEMAPHORE 
1 1ST ACCESS CONTROL REGISTER 
1 1ST ACCESS DATA REGISTER 
1 1ST INTERRUPT VECTOR 
INCREMENTED BY EACH PROCESSOR 



lAINDtC WEK8G-C 



CFKBGr.PH 



13-MAR-80 16:(K 



PDP-11/70 SYSTEM POWER FAIL 



886 01 7040 000400 

& 8! 88 ffifg 

889 017052 0004 00 

890 017060 000400 

891 017062 M7177 

892 01 7064 1 77777 

893 017066 006405 
894 



061266 
000400 



071266 
000400 



APT MAIL80X-E TABLE 



F 3 

MACV11 30A(1052) 



13-MAR-80 16:04 PAGE 19 



BMSK: .WORD 400 aiUST INITJAL BOOT MASK 

BFADR: .WORD DSK8UF .DSKBUF ♦ 1 00&O.DSKBUF ♦20000.DSKBUF ♦ 30000 

VELLlM: .WORD 400.400.400.400 



PUT: 

TVPLCK: 

FACTOR: 



-I 
-1 

2)000. /6 
.EVEN 



CPU UNDER TEST 
ERROR/ TYPE SEMAPHORE 
POWER DUN FACTER 



SfO 0031 

.MASS8US TRANSFER BU' AR 
;»fltOW /ONf BOUNDARY 



MAINDEC-1 1 - 
CE*BGC.P11 



895 

896 

897 

898 

899 

900 

901 

90? 

903 

904 

905 

906 

907 

908 

909 

910 

911 

91? 

913 

914 

915 

916 

917 

918 

919 

920 

9?1 

922 

923 

924 

925 

926 

927 

928 

929 

930 

931 

932 

933 

934 

935 

936 

937 

938 

939 

940 

941 

942 

943 

944 

945 

946 

947 

948 

949 

950 



•CErBG-C 

1 3-MAR-80 



PDP-11/70 SVSrEM POWER FAIL MACV1 30A 
16:04 ERROR POINTER TABLE 



G 3 

. 1 052) 



13-MAR-80 "6:04 PAGE ?0 



SEO 003? 



01 7070 

017070 
01 7072 
01 7074 
017076 



017100 
017102 
017104 
017106 



017110 
017112 
017114 
017116 



017120 
017122 
017124 
017126 



017130 
017132 
017134 
017136 



017140 
017142 
017144 
017146 



017150 
017152 
017154 
CI 71 56 



045274 
046563 
047166 
000000 



045336 
000000 
000000 
000000 



045404 
000000 
000000 
000000 



045451 
000000 
000000 
000000 



045505 
046461 
047144 
000000 



045534 
046461 
047144 
000000 



045564 
046514 
047154 
000000 



. S8TTL ERROR POINTER TABLE 

•THIS TABLE CONTAINS THE INFORMATION FOR C ACH ERROR THAT CAN OCCUR. 

• THE INFORMATION IS OBTAINED BV USING THE INDEX NUMBER FOUND IN ...... 

•LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 

•N0TE1 IF JITEMB IS 0 THE ONLY PERTINENT DATA IS <$ERRPC>. 

•N0TE2- EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOiiOWS: 



SERRTB: 



EM 

DH 
DT 
D r 



;;ITEM 1 
EM1 
DH10 
DT10 

0 

;;ITCM 2 

EM2 

0 

0 

0 

;;ITEM 3 

EM3 

0 

0 

0 

;;ITEM 4 

EM4 

0 

0 

0 

;;ITEM 5 

EM5 

DH5 

DT5 

0 

;;ITEM 6 

EM6 

DH5 

DT5 

0 

; ; I TEM 7 

EM7 

DH7 

DT7 

0 



; .-POINTS TO THE ERROR MESSAGE 
;;POi;jTS TO THE DATA HEADER 

POINTS TO THE DATA 
;; POINTS TO THE DATA FORMAT 



UNEXPEC T ED POWER FAILURE ON CPU 
TESTNO ERRORPC 
$TSTNM,$ERRPC 



.•UNEXPECTED POWER UP SEQUENCE ON CPU 



.•ILLEGAL POWER DOWN SEQUENCE 



; ILLEGAL POWER UP SEQUENCE 



UNEXPECTED TRAP TO LOCATION 4 
PID ERRORPC CPUERR 
1REG0.$ERRPC.SREG1 



.•UNEXPECTED TRAP TO 10 
;PID ERRORPC CPUERR 



UNEXPECTED TRAP TO 114 

PID ERRORPC CPUERR MEMERR 

SREGO.SERRPC ,$REG1 .$REG? 



MAINDEC-1 1-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MAC Y 

CEKBGf.pl 1 13-MAR-80 16:04 ERROR POINTER TABlE 

^ 1 

952 ;;ITEM 10 

953 017160 045615 EM10 

954 017162 046563 DMO 

955 017164 047166 DT10 

956 017166 000000 0 
957 

958 ;.ITEM M 

959 017170 045651 EM11 

960 017172 046606 DH11 

961 017174 0471 74 DT11 

962 017176 000000 0 
963 

964 ;;ITEM 12 

965 017200 045673 EM12 

966 017202 046563 DH10 

96 7 017204 047166 DT10 

968 017206 OOOOOC 0 
969 

970 ; ; ITEM 13 

971 017210 045725 EMI 3 

972 017212 046640 DH12 

973 017214 047204 DTI? 

974 017216 000000 0 
975 

976 ;;ITEM H 

977 017220 045766 EM14 

978 017222 046727 DH14 

979 017224 047174 DT1 1 

980 017226 000000 0 
981 

982 ;;ITEM 15 

983 017230 046014 EM15 

984 017232 046563 DH10 

985 017234 047166 DT10 

986 017236 000000 0 
987 

988 ;;ITEM 16 

989 017240 046053 EM16 

990 017242 046563 DH10 

991 017244 047166 DT10 

992 017246 000000 0 
993 

994 ; ; I TEM 1 7 

995 017250 046132 EM17 

996 017252 046727 DH14 

997 017254 047174 DT11 

998 017256 000000 0 
999 

1000 ;;ITEM 20 

1001 017260 046201 EM20 

1002 017262 046762 DH20 

1003 017264 047214 DT20 
'004 017266 000000 0 
1005 

1006 ;;ITEM 21 



H 3 

30A(1052> 13-MAR-80 16-04 PAGE ?1 



SEO 0033 



ADDRESS ON THE STACK IS WRONG 
TESTNO ERRORPC 
STSTNM, ERRORPC 



OLD PS IS WRONG 
TEST.*) ERRORPC PS 
tTSTNM.SERRPC.tREGO 



;ODD ADDRESS TRAP FAILED 



; MEMORY CORRUPTED ON POWER FAIL 



TIMEOUT TRAP FAILED 
TESTNO ERRORPC CPUERR 
STSTNM.SERRPC.SREGO 



; POWER FAIL RETURNED TO SOON 



.MOT ENOUGH OR T 00 MABY INSTRUCTIONS EXECUTED 



;N0 MEM. MANG. VIOLATION OR TRAP TO 4 



NO 1 1ST INTERRUPT 

TESTNO I ST ID ACR PGTE PGCS 
$ T S T NM . $RE GO . $RE Gl . JREG2.JREG3 



MA1NDE 1 • 
CEKBGC.P11 



("EKBG-C 

13-MAR-80 



1007 


017270 


046225 






1008 


01 7272 


047037 






1009 


01 7274 


047230 






1010 


01 7276 


000000 






1011 










1012 
1013 










017300 


046266 






10H 


017302 


047107 






101 s 


017304 


047242 






1016 


017306 


000000 






1017 










1018 










1019 


017310 


046327 






1020 


017312 


047107 






1021 


017314 


047242 






1022 


017316 


000000 






1023 










1024 










1 025 


01 7320 


046377 






1026 


017322 


046563 






1027 


01 7324 


047166 






1028 


017326 


000000 






1029 










1030 










1031 


017330 


046426 






1032 


01 7332 


046563 






1033 


01 7334 


047166 






1034 


017336 


000000 






1035 










1036 










1037 










1038 










1039 










1040 










1041 




020000 






1042 


020000 








1043 


020000 


012704 


016774 




1044 


020004 


012724 


000001 




1045 


020010 


022704 


01 7026 




1046 


020014 


103373 






1047 


020016 


012704 


014462 




1048 


020022 


005024 






1049 


020024 


022704 


016772 




1050 


020030 


103374 






1051 


020032 


012737 


177777 


01 7036 


1052 


020040 


012737 


000400 


01 7040 


1053 


020046 


012737 


1 77777 


01 7062 


1054 


020054 


012737 


177777 


01 7064 


1055 


020062 


000207 






1056 










1057 


020064 


013706 


014200 




1058 


020070 


012704 


014226 




1059 


020074 


012703 


000004 




1060 


020100 


012724 


177777 




1061 


020104 


077303 






1062 











PDP-11/70 SYSTEM POWER FAIL MACVll 
16:04 ERROR POINTER TABLE 

EM21 
DH21 
DT21 
0 

; ; I TEM 22 
EM22 
DH22 
DT22 
0 

;;ITEM 23 
EM23 
DH22 
DT22 
0 

; ; I TEM 24 
EM24 
DH10 
DT10 
0 

;;ITEM 25 
EM25 
DH10 
DT10 
0 



I 3 

30A(1052) 



13-MAR-80 16:04 PAGE 22 



SEO 0054 



; INCORRECT BRK AND/OR DCF FLAGS 

; TESTNO I ST ID FOUND SHOULD BE 

;STSTNM.SREG0.SREG1.SREG2 



; CPU DID NOT TRAP TO 24 
; TESTNO I ST ID ERRORPC 
; JfSTNM.SREGO.SERRPC 



; CHECKSUM ON MASS8JS T RANSFER IS WRONG 



;N0 POWER FAIL ON 
.-TESTNO ERRORPC 
;$TSTNM.$ERRPC 



CPU 



.•UNEXPECTED CPU 
.•TESTNO ERRORPC 
;HSTNM,$ERRPC 



INTERRUPT 



RESTRT : 
IS: 

21: 



STRT: 



4S: 



. =20000 

MOV 
MOV 
CMP 
BHIS 
MOV 
CLR 
CMP 
BHIS 
MOV 
MOV 
MOV 
MOV 
Ri 

MOV 
MOV 
MOV 
MOV 

SOB 



#CPUACT. 
#1. (R4)* 
#S2L1, R4 
1$ 

#STOP. R4 
(R4)* 

#EXTRA, R4 
2$ 

/M. FIRST 
#400. BMSK 
#-1 . PUT 
#-1. TYPLCK 
PC 

SSSTP, SP 
#$CPUID.R4 
#4.R3 
#-1.(R4)* 
R3.4S 



;;LOAD CODE ABOVE THE FIRST 4K (WORDS) 
R4 ."RESET THE VARIABLES 



; RE TURN 

.•INITIALIZE THE STACK 

;;GET ADDRESS OF CPUID T ABLE 

;;INIT COUNTER 

;;INIT TABLE WITH -1'S 



.-.-INITIALIZE A FEW VECTORS 



HAINDEO 1 1 -CE«.BO-C PDP-11/70 SYSTEM POWER FA] L MACYll 30A<1052) 13-HAR-80 16:04 PAGE 23 

CEKBGC.Pn 13-MAR-80 16:04 ERROR POINTER TABLE SEQ 0035 



1 ru.1 

I l JO 3 


roAi aa 
UcU I Uo 


A1 3717 


A1A/.13 

UjO*» jc 


AAAA1A 
UwVV 3U 




nuv 


tfCPRCAD anCMtiicf 
W»t nltUn , n 1 VC V. 




•PMT UP C TAR PAR PRRAR Oft IT IMP 
, CHI VCLiUn r Un CnnUH KUU'lnlC 




\JC\J 1 1 4 


AACA17 
UUjUji 


AAAA13 






n d 
L Ln 


(Wtn 1 VC L *c 




• i PuPi A 
, LC VC L U 


i uoj 


A3Ai oa 
Ucv ' c\J 


A1 3777 
vie' J' 


A/ (1C30 


AAOA I/. 
Uvvu J* 




MAU 

nuv 


#$TRAP.i#TRAPVEC 




• TDAO UPTTAO CAR TRAP fAI 1 C 
. IIVV VCLiUn run l H/\r LMLLj 


i uoo 


A3A1 3A 
UcU I co 


AACA17 
UUjUji 


UvWjO 






L Ln 


a*TRAPVEC*2 




■ i PuPi O 
• LC VCL U 


1 \JOf 


A3A1 13 
Ucv I 3C 


A1 3717 


w*»UO<JD 


AAAA3A 
Uwuwc't 




MAU 

nuv 


*PWRDIS.a#PURVEC 




•PAfMT TO RALiFR Fill rilCPATfM QCi IT I HJf 
. rUlnii IU rUwer rMIL wlorMPLH KUU 1 1 nK 


I vOO 


A3A1/.A 


AACA17 


vwUcO 








a»»PWRVEC*2 




• 1 PUPI 0 
, LC VC L U 




A3Al / A 

UcU 1 «t*§ 


AI 3717 
U 1 c I 




wvUuvh 




nuv 


#25$,a#ERRVEC 




■CPT IC f PI 1 PRRAR UP i" TAR TkirACP CJ) r^'kiT TUPRP 
. jC i Ur iru CWtUft vCLiUVf IWviAJc io nil incne 


i A7A 
lUi U 


A3A1 »i3 
Ucv I 3c 


01 3717 
U 1 c i J' 


A1Z.733 
U I Hf cc 


A1A71 A 
u 1 *• i 1 0 




nuv 


#TrPQUE*4.TYPQUE 




•fWITIA.' I7P RPAR PATMTPR 
. 1 l»l 1 1 nL 1 L C ItcW l"UlnllCH 


i A71 

IUI I 


A3A1*J"\ 
UcU 1 Ov 


01 3717 
U It' 3' 


01c733 
UIhi cc 


A1 A730 
Ul*!' cU 




ItUV 


(fTYPQUE*4,TYPQUE*2 


•INITIAI 1 7P FORUARf) POINTPR 

. 1 nil 11 ^L. ILL r wnWWly nj llliC" 


1 A73 

IUI c 


A3A1AA 
UcU I DO 


AACAAA 
wv3UvU 










RO 




•^FT in IN D I ^Pl ATPMPMT DFf,<; 
. jc i lu ini vi jr Lwicncii i ncoo. 


1071 


A3A1 70 


AACOA1 
UU3UV I 










R1 






1 a 7/. 


A3A1 73 
UcU I r c 


A31777 
vt J' J' 


AOOOc3 


OADOAA 




r up 


3*42, 3#46 




IMDFR ATT AI ITO MOTIF ~> 
UnlVCrt nL l f**J 1 U irUUC . 


1A7C 


A3A3AO 
UcUcUv 


OO1Z.03 
UU I *«Uc 








OPO 

□c u 


40$ 




oiwn.n ir icj 


i A7*. 
iu/ o 


030303 


1 U***tU 1 


U*»UO*ih 






T VPP 


. TM1 




TVPP PROGRAM MAMP 


1 A77 


03030A 








**u* - 










1 07ft 


03020A 


01P717 

UlCI J' 


1 77 c 70 
i i f jf \j 


D141ft0 
UI1 1 ou 




nuv 


#177570, SWR 


•cpT CUR 
, oc i own 


i atq 


A3A31Z. 


1 13717 
1 jc r Jl 


0OO300 
UwVcww 


01A1 C 7 

u mjji 




Rt TP 

Dl lo 


iTAPTSJZE, $ENVM 


••CI7F IftftFR APT' 

-DDAtjru TP MA 




03033? 


001401 
UU 1 *»U3 








pen 


50$ 




1 UO 1 


030334 
UcUcc'* 


01 P7T7 

UlCI J' 


01 A1A0 
U 1 *» jOu 


01 41 AO 

U 1 H 1 OU 




MAW 

nuv 


#$SWREG, SWR 


•IKF APT CUITTM RFt*; 
. UOC nr i Owl P in nc u 


10ft3 

1 UOc 




01P777 


000100 

WW 1 uv 


1 7^7?0 

1 1 Jl cu 


JU# • 


RI T 


#«PSw,asuR 




■IC HAOnuADF CUlTfH RFH THFRf AMD MP CFT*> 
. 1 o nnni/>nn[ jwi i in nc w ■ i nene . nfm/ ~ w oc i 




OP0340 


0010P1 








R.MF 


20$ 




•CUR IC THFRF AMD MP IC CPT 
. own i o p nene nfw*i rr i o ji i • 


1 no/, 

1 UO** 


03034? 


001AI 1 ; 

WW 1 **JJ 








oc w 


30$ 




■CUR IC THPRP FMlT MP IC MOT CPT 
. own i o i nene CwJ i nr i o i»u p oc p . 


1 AO? 

i uoj 


0?0?44 


01 P7^7 


U^UDcM 


000004 

UUVUUH 




MOV/ 

PTWV 


#ERRDIS # a#ERRVEC 




-RPCPT fPtl PRROR VP f TOR 
. nc oc i v. « u ennvn vti i vn 


10ftA 
1 WOO 


o?o?s? 


01 P7i<.0 


WHWwJW 


01470? 

Ul**l uc 




MOV/ 


fCPUER.ERRTABfRO) 


•PI Af; All IMFXPFTTPD TRAPC TO 4 

. r L^w ntl u«vc Arc l> I CIV 1 o 1 u 


1 no 7 

1 JO ' 


0?0?A0 


01 P7^7 


W 1 1JUU 


0141ft0 

UIt 1 wU 




MOV 


#$SWREG.SWR 




.-SETUP FOR SOFTWARE SWITCH REG 


1 uoo 


0?0?AA 


01 P7^7 


000174 

WWW 1 1 *• 


0141 70 




MAW 

ITUV 


#OISPREG.DISPLAY 






i uo~ 


0?0?7£ 

VCVC 1 


yjjc tit 


000100 
www 1 uv 






RI T 

Ol 1 


#MPSW.aSUR 




•IC MP CUITfH CPT IN COP TUAPP CUlTfH RFG' 


ioqo 


0?0V}? 


001A1 S 

WW IS 1 J 








RFQ 


30$ 






1 AQ1 

I WT 1 




01?7^7 

UlCI Jl 


UHUuCI 


00000^ 


cv» . 


MAU 


#ERRDIS.a#ERRVEC 






10«V3 
i wTTc 


0?0^1? 


01 P7ft0 


U**UQJu 


01 A70P 




MOV 

ITU V 


/rCPUER.ERRTAB(RO) 


•Fl Afi All tNFXPFfTFD TRAP^ TO L 


1 AQ7 


0?0^?0 


1 < >P7^7 

I 3ci Jl 


000001 

www I 


01 A7^7 




Q I CD 
Ol JO 


*8IT0,nPF 




.-SET THE iMP FLAG. 
.-LET'S GO 


1 w^* 


0?0^?A 


00/Uilft 








op 

OH 


31$ 




loo's 

1 UT3 


0?01V1 


0AP71A 
wDt ' IO 


000004 




C 3» . 


ADD 


#4.(SP) 




.SKIP RETURN 


1 OCJA 


0?0^^4 


OOOOO? 

VAAAA/C 








RT F 

« I i 






.-RETURN FROM TRAP 


10Q7 

1 wTI 


0?033A 

V/C W_J Jvj 


01P737 

w 1 C f Jl 


040A?4 

USUwC** 


000004 


304- 

JU* • 


MOV/ 
nuv 


#ERRDIS.a#ERRVEC 




.-RESET ERROR VECTOR 


109ft 

i w ~o 


0P0344 


UlCI WW 


04 OA 30 


01470P 




MOV 

ITUV 


#CPUER,ERRTAB(RO) 


.-FLAG ALL UNEXPECTED TRAPS TO 4 


1 wiry 


0?0^*>3 


10S0^7 

1 VJUJI 


01A737 

U 1 Ul Jl 






n Rfl 


W 


•; CLEAR THE MP flAG 


1 100 

I 1 ww 


0?0**>A 


104401 

1 V**** W 1 


041 100 

U** P 1 uv 






T VPP 

i i re 


,TM7 


• ; CUNIPR0CESS0R NODE IS IN EFFECT3 


1 101 

1 IV/' 


0?03A? 


ooozps 








RR 


42$ 


-.-ENTER INTO N0N MP EXECUTION STREAM 


110? 


0?0V>4 


10X^01 


041033 

US 1 U J J 




jl*- 


T VPP 

1 i ' c 


,TM6 


.'CMULTIPROCESSOR MODE IS IN EFFECT] 


1 103 

1 1 u J 


0?0370 


017737 

Will Jl 


1 73564 

1 1 J Jwt 


014^A0 




MOV 

nuv 


aSUR,$PSWR 


;SET UP PSEUD0 SWITCH REGISTER. 


1104 


03037ft 

VcUJl U 


01 3704 

UlCI w** 


01 41 AO 

UI1 1 w 






MOV 

ITUV 


#SUR,R4 -POINT TO SUR TABLE 


1 105 


0?040? 


01P70S 

Ulci UJ 


0O0004 

UVVVV't 






MAW 

nuv 


#4,R5 


;SET COUNTER 


' 1 vAJ 


0?040A 


01?7?4 

UICIC1 


OliAAO 

U 1 1UUU 




411- 


MOV 

ITUV 


#$PSWR.(R4)* 


;L0AD THE SLAVE SWITCH REG. POINTERS 


1 107 

1 IV/' 


0?041? 


077503 








JUO 


R5,41$ 


-.LOOP TILL DONE 


1 10ft 

( P uo 


0?O414 




04 OA 7ft 

USUO 1 w 






T VPP 

1 l"L 


,TM2 


-."SWITCH REGISTER = " 


1 10Q 


0?04?0 


01 77Lf% 


1 73S34 

1 1 JJ JM 






MOV 

nuv 


aswR,-(SP) 


•SAVE aSWR FOR TYPE OUT 


1110 


0?04?£ 


10^^0P 










;G0 TYPE 


— OCTAL ASCI I (ALL DIGITS) 


1111 

1 1 1 1 


0?04?A 


10^^01 


014333 

U 1 *f J J J 






TVPP 

I ii c 


,$CRLF 


•TYPE CRLF 


1112 


020432 


104401 


014333 






TYPE 


,$CRLF 






1113 


020436 


032777 


000040 


173514 


42$: 


BIT 


*UBESU.aSWR 


;UBE SWITCH SET? 


I1H 


020444 


001411 








BE0 


43$ 


.MOT USED 


1115 


020446 


032777 


000200 


173504 




BIT 


#SW07. aswR 


•WILL SECTION 1 BE SKIPPED? 


1116 


020454 


001005 








BNE 


43$ 


• ; BRANCH 
■."CUNIBL 


IF YES 


1117 


020456 


104401 


040723 






TYPE 


,TM4 


IS EXERCISER WILL BE USED]" 


1118 


020462 


105237 


016740 






INC8 


JBEF 


•;SET USE 


FLAG 



MAINDEC-11-CEKBG-C 
CEKBGC .P1 1 13-MAP-80 



1119 020466 

1120 020470 

1121 020474 

1122 020500 

1123 020504 

1124 020506 
1125 

1126 020512 

1127 020516 

1128 020524 

1129 020532 

1130 020536 

1 1 31 020540 

1132 020546 

1133 020554 

1134 020556 

1135 020562 

1 1 36 020566 

1137 020572 

1138 020574 

1139 020576 

1140 020602 
1141 

1142 020604 
1143 

1144 020606 

1145 020614 

1146 020620 

1147 020624 
1148 

1149 020632 

1150 

1151 

1152 020634 

1153 020640 

1154 020642 

1 1 55 020646 

1156 020650 

1 1 57 020654 

1158 020660 

1159 020664 

1160 020670 

1161 020672 

1162 020676 

1163 020702 

1164 020704 

1165 020712 

1166 020720 

1167 020726 

1168 020734 

1169 020740 

1170 020742 

1 1 71 020744 

1172 020752 

1173 020760 

1 1 74 020762 



000404 
104401 
105037 
105737 
001002 
000137 

017702 
012737 
052777 
012705 
077501 
012777 
032777 
001771 
01 7705 
072527 
104401 
010546 
104405 
010537 
005000 

005001 

012777 
017703 
072327 
012777 

005004 



032702 
001471 
032703 
001413 
010437 
104401 
104401 
013746 
104405 
104401 
020437 
001450 
012737 
012777 
013777 
052/77 
012701 
077001 
077102 
012777 
032777 
001771 
005077 



PDP-11/70 
16:04 



040765 
016740 
016737 

021076 



SYSTEM POWER FAIL 
ERROR POINTER 



173442 
000001 
100000 
002000 

000001 
004000 

1 76246 
W7770 
041665 



014226 



000007 
176212 
1 77770 
021140 



000001 

000001 

014310 
014333 
041176 
014310 

041207 
014226 

020^va) 
OOOOOO 
017040 
000001 
000200 



000001 
004000 

(76042 



016774 
176276 



43$: 
651: 



.S8TTL 
55$: 



176262 81$: 
1 76256 



176214 
176202 



1$: 



82$: 



OOOOOO 
176110 
176104 
176076 



70$: 



MACYll 
TABLE 

65$ 
.TM5 
OBEF 
MPF 
55$ 
STO 



K 3 

30AM052) 



13-MAR-80 16:04 PAGE ?4 



SEC 0056 



BR 

TYPE 
CLRB 
TST8 
BNE 
JMP 

BOOT AND INITIALIZE THE 



MOV aSWR.R2 

MOV r .CPUACT 

BIS #8IT15.aACR 

MOV #2000. R5 

SOB R5,. 

MOV #1.aACR 

BIT *8IT11,SADR 

BEQ 81$ 

MOV SACR.R5 

ASH #-10. R5 

TVPE .TM76 

MOV R5. -<SP) 
TVPDS 

MOV R5.$CPUID 

C.R RO 

CR R1 

MOV #DCF,iACR 

MOV 3ADR.R3 ;;COPY 

ASH #-10.R3 

MOV #SLVENT,3ISTVEC 

CLR R4 



."CUNIBUS EXERCISER WILL NOT BE USED]" 
; CLEAR THE U8E FLAG 
.•MULTIPROCESSOR MODE IN EFFECT? 
.•BRANCH IF YES 
.•START SETTING UP VECTORS 
SLAVE CPUS 
.•COPY SWITCH REGISTER INTO R2 
.•RESET * OF ACTIVE CPUS 
.INITIALIZE THE 1 1ST . 
;LET IT SETTLE AFTER INI T 

.ACCESS PGCS REGISTER 
;IS IT READY 
;N0T YET. 
;COPY ACR TO R5 
; CREAT PHYSICAL ID 
,-IDENTIFv THE MASTER 



176056 83$: 
176052 

84$: 



BIT A3IT0.R2 

BEQ 2$ 

BIT #BIT0,R3 

BEQ 82$ 

MOV R4.$TMP0 

TYPE .$CRLF 

TYPE ,TM11 

MOV $TMPO.-(SP) 

TYPDS 

TYPE .TM12 

CMP R4.$CPUID 

BEQ 2$ 

MO #20000. a#o 

MOV #PGTE,3ACR 

MOV BMSK.3ADR 

BIS *8IT0,aADR 

MOV #200, R1 

SDB RO, 

SDB R1, 70$ 

MOV #PGCS. SACR 

BIT #BIT11, SADR 

BEQ 83$ 

CR 3ACR 



.SET SELF ID OF MASTER IN TABLE 
;REGO. CONTAINS WORD DISPLACE- 
;MENT INTO CPUID TABLE *** 
;R1 CONTAINS THE BYTE DISPLACEMENT, 
; THE TRUE LOGICAL ID. 
.ACCESS DCF REGISTER OF IIST 
DCF INTO R3 

.•BRING BRK MASK INTO POSITION 
.-SET ENTRY POINT FOR SLAVES 

;R4 CONTAINS THE DECIMAL VALUE 
;0F THE SELF ID OF THE CPU UNDER 
; INTEROGATION. 
;D0 WE WANT THIS CPU? 
; NO. CONTINUE 
;IS IT ALIVE? 
.YES 

.-SAVE CONTENTS OF R4 
;NO,CRLF 
. "CPU # " 

; SAVE $TMPO FOR TYPEOUT 
;G0 TYPE — DECIMAL ASCII WITH SIGN 
."SPECIFIED BUT NOT ACTIVE" 
;IS THIS THE MASTER? 
;YES. IGNORE 

M9312MP MOVES a#C TO SP ON BOOT 
.ACCESS PGTE REG. 
.SET TO BOOT AND THEN... 
;800T THE CPU 

;SET UP A LONG DELAY (5 SEC) 



; CHECK FOR IIST READY 

.•BRANCH IF NOT 

; .-RESET ACR (POINT TO PGTE) 



MAINDEC-11-CEKBG-C 



CFKBGC.P11 


T uin DA 

1 3-MAR-oU 


io:uh 






020766 


H.1 7777 

U i if f f 


m 7aaa 


1 7AA7A 


1176 


020774 


f\K")777 


AAAAA1 

uuuuu 1 


1 7AH7A 
I fOUjU 


1177 


021002 


WJCi' 


ai a77/ 
U 1 Of /*» 




1178 


021006 


A1 0777 


AAAAA1 
UUUUU 1 


1 7AA1A 
I f OU 1 H 


1179 


021 OK 


n.70777 

Vicf f f 


AAZ.AAA 


1 7aai a 

1 ' OU 1 U 


M80 


021022 


fVM 771 
UU I ft I 






1181 


021024 




aaaaa7 




1182 


021030 


UUcU IU 






1183 


021032 


|V"VC ~)(\J 

\AJJC\r* 






1184 


021034 








1185 


021036 


AAA. 71*17 
UUOcU i 






1186 


021040 


AAX777 
WOijf 


ai 7nz.n 




1187 


021 044 


AAA.777 


ai 7AAA 
U 1 ' UUU 




1188 


021050 


A/W.71 
UUUO' I 






1189 


021052 


A0777 
\JJCf if 


nni aaa 
UU I UUU 


1 777LL 
I f f f HG 


1190 


021060 


aa^a77 


UUUwU 




1191 


021064 


A1 1777 

U 1 if jf 


A1 A77Z. 

U I O' f h 


A1 A77A 
U I Of 'U 


1192 


021072 


AA^777 


m A770 
U I Of 1 U 




1193 










1194 










1195 










1196 










1197 










1198 










1199 










1200 










1201 










1202 










1203 


021076 


A^P777 

yjjcf jf 


aaaaia 


1 777 Lf\ 

\ f f f HO 


1204 


021104 


A1 57AA 
U I C f uo 


ai aaaa 

U I HUUU 




1205 


021110 


AA^ADA 
UU JUcO 






1206 


021112 


app7aa 

Ucc f UO 


aiz.i aa 

U I H I ou 




1207 


021116 


AD1 X7L 
UU I Jf H 






1208 


021120 


ni 77n/> 

U I J' uo 


m apaa 

U I HcUU 




1209 


021 124 


A1 7777 

U I Ji Jf 




07SA7A 

UJ3** 


1210 


021132 


aa*»a77 

UUDUj' 


U 1 H JHH 




1211 


021136 


aaaz.73 






1212 


021 HO 








1213 


021140 


n«;?777 

\lJCf JI 


aai rvnn 

UU 1 uuU 


1 777L(\ 

\ f f f HO 


1214 


021146 


\AJJCJt 


A1 Lf^LL 
\J I HQS s 




1215 


021152 


m 7701 


\J I HOHH 




1216 


021156 


aiai aa 

U I U I UU 






1217 


021160 


aaa7aa 

UUOjUU 






1218 


021162 


ai 77n*; 


1 75AZ.3 
I fjOhc 




1219 


021166 


A7P«»77 

Uf CJCf 


1 7777A 
\ f f f f \J 




1220 


021172 


U 1 UJOv 


U I HCCO 




1221 


021176 


n«;5777 
vjcf f f 


1 AAAAA 


1 7 r \f\7L 
I ' jOch 


1222 


021204 


01 ?777 
\}\c.f t f 


aaaaai 

VAAA/U 1 


I f JO I o 


1223 


021212 


AS2777 


aaaaaa 


I f JO 1 1 


1224 


021220 




1 7777A 
1 f f f fO 




1225 


021 224 








1226 


02122*. 


005060 


014322 




1227 


021230 


016060 


021242 


014032 


1228 


021236 


000170 


021252 




1229 


021242 


021450 






7230 


021244 


021450 







L 3 

PDP-11/70 SYSTEM POWER FAIL MACY11 30A(1052) 13-MAR-80 
BOOT AND INITIALIZE THE SLAVE CPuS 



85$: 



16:04 PAGE 25 



SE0 0037 



2$: 



nuv 




, oc 1 Lr' IU JNICMKUr'l 


QIC 
01 o 


JfQtTO 3 ADD 


• r.n i ikjtcddiot ci av/c 
. uu . , im i cwtt^ i jLmvc 

rnwui aajdtucd atttuf roii 






nuv 




. rucrr c no iict DCAriv 

,LnCL^ rUK IJil Ht nUl 


D 1 T 


MB 1 Til 2>f\D 




OCA 


O J» 






DZ. «7 


• aii mic c tad Tcri ■> 


BoL 


7t 




iMr 


nH # 




M >n 


nc . 






R7 


•WFVT BO* BIT TD CPT 


AS! 


BMSK 


-NEXT BOOT MASK 


ASL 


INTMSK ; 


;NEXT INTERRUPT MASK 


BR 


1$ 


;G0 TRY ANOTHER 


BIS 


#81 T9, C0NTRL ; 


SET CACHE BYPASS 


CLR 


a#o 


RESTORE L0C. 0 


MOV 


CPUACT.CPULS1 




DEC 


CPULS1 


CONTAINS M OF ACTIVE SLAVE C 



.S8TTL INITIALIZE THE COMMON TAGS 



.-.CLEAR 

ST0: 



SLVENT: 



THE COMMON TAGS 
BIS #14. 
MOV #$CMTAG.R6 
CLR (R6)+ 
CMP #SWR,R6 ;;D0NE? 
BNE .-6 
MOV SJSTP.SP 
MOV SENDCT.SEOPCT 
CLR SPASS 
BR MSTENT 



(SCMTAG) AREA 
C0NTRL .'DISABLE CACHE 

; .-FIRST LOCATION TO BE CLEARED 
;; CLEAR MEMORY LOCATION 



MSTENT: 



10$: 



BIS 
INC 
MOV 
MOV 
ASL 
MOV 
ASH 
MOV 
BIS 
MOV 
BIS 
CLR 

CLR 
MOV 
JMP 

TST1 
TST1 



#BJ T9,a#C0NTRL 

SLVID 

SLVJD.R1 

R1.R0 

RO 

SACR. RS 
#-10, R5 
R5.$CPUID(R0) 
#8IT15,aACR 
#PGCS. SACR 
#BIT2. SADR 
a#PSU 



; ;L0OP BACK IF NO 
.-.SETUP THE STACK POINTER 
.-.SETUP END-OF -PROGRAM COUNTER 
;; CLEAR PASS COUNT 



;;TURN OFF CACHE 
;; CREATE CPUID 
;;AND MOV TO R1 

;; CREATE WORD INDEX INTO CPU TABLE 
;;C0PY ACR 
;;GET THE ID 

;;SET SELF-ID INTO TABLE 
; .-RESET THE 1 1 ST 
.•ENABLE INTERRUPTS 



.-.-LOWER PROCESSOR PRIORITY 



SESCAPE(RO) 

10$(R0).$LPERR(R0) 

SFORKTB(RO) 



;; CLEAR THE ESCAPE (R0) ON ERROR ADDRESS 
;; SETUP FOR THE ERROR LOOP ADDRESS 
; .-DISPATCH THE FOLLOWERS 



nAINDEl- 1 1-CEK8G-C PDP-11/ 70 SYSTEM POWER FAIL 

'EKBGC.P11 13-MAR-80 16. OA INITIALIZE THE 



1 C J 1 


021 ?£6 


021 £50 








TST1 


1 C 


o?i psn 










TST1 


1 C J J 


VC 1 C JC 


021 342 






FORK TR- 

r v»»^ i r J • 


MSO 


1234 


0P1254 


0P1262 

V/c I tut 








Si 1 


1235 

■ C J J 


021 256 

VC 1 C /V 


021302 

VC 1 J\JC 








SL2 

jLl 


I C 


021260 


021 ^22 

VC 1 JCl 








SL3 


' C J ' 


021 ?6? 


016006 

V 1 UVvu 


014200 




si 1 • 


MOV 

I nj w 


1238 

1 C JO 


021266 


000001 

VWW 1 








UAI T 


1239 


021270 


052777 

V JC f f ' 


100000 

1 vvvVv 


175532 

l * J J JC 




BIS 


1240 


021276 

VC 1 C r V 


0001 37 

VW 1 Jf 


021450 

VC I " J\J 






J MP 

Jl w 


1241 


021 302 

VC 1 -J\sC 


016006 

V I WW 


014200 

V 1 ~ C VV 




Si 2- 


MOV 


1242 


021306 

VC ■ -/w 


000001 

vWW ' 








WAIT 


1243 


021 310 

VC ' -* 1 v 


052777 

V JC iff 


100000 

i VWW 


175512 




BIS 

UJ J 


1244 


021 316 

v/C 1 J l v 


0001 37 

WV/ 1 J ' 


021450 






JMP 

J 1 w 


1245 


021322 

V/C > JL c 


016006 

V ' WW 


014200 




SL3- 

jl j ■ 


MOV 


1246 


021326 


000001 








WAIT 


1247 


021 330 


052777 


100000 

1 VVVVV 


175472 




BIS 


1248 


021336 


000137 


021450 






JMP 


1249 


021 342 


105737 


016737 




MSO: 


TSTB 


1250 

i C J V 


021 346 


001440 








BEQ 


1251 


021350 


013702 


01 7034 






MOV 


1252 


021 354 


062702 

VVL ' VL 


000002 

vwwc 






ADD 


1253 


021360 


010277 


175450 






MOV 


1254 


021364 


012712 


000002 

VWW *— 






MOV 


1255 


021 370 


012777 


000000 

vw vvv 


175432 




MOV 


1256 


021376 


017702 


172556 






MOV 


1257 


021402 


042702 


1 77760 






BIC 


1258 


021406 


010277 


175420 






MOV 


1259 


021412 

Vw ■ ~ ' c 


032737 


000001 

VWVV 1 


016774 




BIT 


1260 


021420 


00U04 








BEQ 


1261 


021422 


012777 


000005 


1 75402 




MOV 


1262 


021430 


000403 








BR 


1263 


021432 


012777 


000007 


175372 


7$: 


MOV 


1264 


021440 


000001 






4$: 


UAI T 


1265 


021442 


052777 


100000 


175360 




BIS 


1266 


021450 








BEGIN: 





1267 
1268 
1269 
1270 
1271 
1272 
1273 



1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
1285 
1286 



M 3 
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COMMON TAGS 



SfO 0038 



$$STP(R0).SP 

*8IT15.aACR 
TST1 

$$STP(«0).SP 

*8IT15,aACR 
TST1 

$$STP(R0>,SP 

*8IT15,aACR 

TST1 

MPF 

BEGIN 

ISTVEC, R2 

*2. R2 

R2, 3ISTVEC 

#2, (R2) 

#PGTE.3ACR 

aSWR,R2 

#1 77760. R2 

R2.3ADR 

#8IT0,CPUACT 

7$ 

#5.aADR 
4$ 

#7.aADR 
#8IT15,aACR 



.•INITIALIZE SLAVE STACK (CPU1) 

.-WAIT FOR MASTER TO START VIA INTERRUPT 

.RESET THE 1 1ST 

.•INITIALIZE SLAVE STACK (CPU2) 
.-WAIT FOR MASTER TO INTERRUPT 
.•RESET THE 1 1ST 

.•INITIALIZE SLAVE STACK (CPU3) 
.-WAIT FOR MASTER TO INTERRUPT 
.•RESET THE 1 1ST 

;MP MODE? 

;N0, DON'T TRY TO INTERRUPT CPUS 
SET UP RETURN FROM INTERRUPT 



ACCESS PGTE REGISTER 
GET COPY OF SWR 
KEEP ONLY THE CPU MASK 
SET THE INTERRUPT BITS 
EVEN OR ODD? 
BRANCH IF EVEN 

GO WITH NO PARITY. ENABLE INTERRUPTS 

GO WITH PARITY. ENABLE INTS. 
WAIT FOR I 1ST TO INTERRUPT 
.•RESET THE 1 1ST 



N 3 

HAINDEC-n-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 30A(1052) 
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SEO 0039 



1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 

1295 

12% 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

^22 

1323 

1324 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 



021450 
021450 
021456 
021464 
021472 
021500 
021506 
021512 
021520 
021522 
021526 
021530 
021532 
021536 
021542 
021544 
021550 
021554 
021554 
021560 
021564 
021570 
021572 
021576 
021600 
021602 
021610 
021610 
021610 
021614 
021616 
021620 
021624 
021630 
021632 
021634 
021636 
021642 
021644 
021650 
021652 



012777 
012737 
012737 
012737 
012737 
005037 
032770 
001402 
000137 
005700 
001011 
104401 
105737 
001004 
104401 
104401 

005037 
012703 
105737 
001407 
106237 
103375 
000241 
052737 



005037 
000001 
010602 
016004 
162704 
020402 
001401 
000000 
016006 
012402 
105737 
001004 
022702 



000001 
033774 
033340 
000001 
040606 
000026 
000200 

024220 



041605 
016740 

041241 
014333 

177776 
021616 
016740 

017022 



000020 
1 77776 



014200 
000004 



014200 
016740 
021616 



•TEST 1 



172512 
014662 
000114 
033342 
000024 

014160 



TST1 



1$: 



4$: 



170016 



64S: 
3$: 



2$: 



MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

BIT 

BEQ 

JMP 

TST 

BNE 

TYPE 

TSTB 

BNE 

TYPE 

TYPE 

CLR 

MOV 

TSTB 

BEQ 

ASRB 

BCC 

CLC 

BJS 



SECTION ONE 



SIMPLE DOWN/UP TEST (KERNAL) 



#1.aDISPLAY 
/TPOWDWN, 
fPARERR. 

*1, a*PARFLG 
#PURDIS,a*PURVEC 
a#PURVEC*2 
#SW07. aSWR(RO) 

1$ 

SEC2 
RO 
4$ 

,TM14 
UBEF 
4$ 

.TM13 
,$CRLF 

a#ps 

#2$.R3 

UBEF 

64S 

UBELCK 
.-4 



;SET TEST NUMBER 

PWRTAB ;SET UP POWER DOWN VECTOR 
a#CACHVEC ;SET PARITY ERROR VECTOR 

;SET MULTI PARITY ERROR INDICATOR 
;SET LOC 24 
SET LOC 26 
SKIP SECTION 1? 
BRANCH IF NO 
ELSE GO TO SEC2 
IS THIS THE MASTER? 
BRANCH IF NO 
"ENTERING SECTION 1" 
USING THE UBE? 
BRANCH IF YES 
PRINT INSTRUCTIONS 



SET KERNAL MODE 
SET POWER UP RETURN 
.USE UNIBUS EXERCISER? 
; BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



#8IT4,a#UBCR2 ;;SET TO POWER FAIL 



70$: 



CLR 


a#ps 


SET KERNAL MODE 


WAIT 




•WAIT FOR THE POWER FAIL 


MOV 


SP.R2 


GET SP 


MOV 


$$STP(R0).R4 


R4 CONTAINS THE STACK INIT. VALUE 


SUB 


#4.R4 


STACK-4 


CMP 


R4.R2 


CHECK STACK 


BEQ 


.♦4 


SKIP IF OK 


HALT 




SP NOT "STACK-4" 


MOV 


$$STP(RO),SP ', 


•RESET SP 


MOV 


(R4)*,R2 


•GET RETURN ADDRESS 


TSTB 


UBEF 


IS THE UBE BEING USED? 


BNE 


72$ 


YES 


CMP 


*2$.R2 


CHECK ADDRESS 



MAINDEC-1 1-CEKBG-C 
CEKBGC.P11 13-MAR-80 



PDP-11/70 
16:(K 



1545 

1544 

1545 

15A6 

1547 

'548 

1549 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1562 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1576 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

1592 

1393 

1394 

1595 

1596 

1597 

1398 



021 6S6 
021660 
021662 
021664 
021670 
021672 
021674 
021702 



021704 
021704 
021712 
021716 
021722 
021726 
021732 
021736 
021742 
021 744 
021750 
021 754 
021756 
021762 
021764 
021766 
021 774 
021 774 
021776 
022000 
022004 
022010 

022012 
022014 
022016 
022020 

022024 
022026 
022030 
022034 
022042 



022044 
022044 
022052 
022060 
022064 
022070 
022072 



001401 
000000 
011402 
022702 
001401 
000000 
032770 
001262 



012777 
012737 
012703 
105737 
001407 
106237 



000000 
040000 



SYSTEM POWER 

n 



72S: 



014160 



FAIL 
SIMPLE 

BEQ 

HALT 

MOV 

CMP 

BEQ 

HALT 

BIT 

BNE 



MACY11 
DOWN/ UP 

.♦4 

(R4KR2 

#0.R2 

.♦4 



#SWH.aSWR(RO) 

TST1 



B 4 

30A(1052) 15-MAR- 
TEST (KERNAL) 



80 16:04 PAGE 28 



SEO 0040 



; SKIP IF OK 

.-ADDRESS ON STACK IS WRONG 

.GET OLD PS 

; CHECK OLD PS 

.SKIP IF OK 

;OLD PS IS WRONG 

.LOOP ON TEST' 

.-LOOP TO TST1 



.-•TEST 2 



PROGRAM VOLATILITY TEST 



TST2: 



01 7777 

VIC* * » 


00000? 


1 72256 




MOV 


#2 3D I SPLAY 


005037 


1 7777b 








WPS 




010000 






MOV 


#10000 R2 

** l WW 0 nt 


012703 

VIC V-/ 


020000 

vC WW 






MOV 


#20000 R3 


005060 


014650 






clr 


CKSLW(RO) 


062360 


014650 




1$: 


ADD 


(R3)*,CKSUM(R0) 


005560 


014650 






ADC 


CKSUM(RO) 


077205 








SOB 


R2 1S 


012703 


022000 






MOV 


#2$.R5 


105757 


016740 






TST8 


U8EF 


001407 








WL 


64 S 


106257 


01 7022 






ASR8 


(J3ELCK 


103375 








BCC 


.-4 


000241 








CLC 




052737 


000020 


170016 




BIS 


#8IT4,8#UBCR2 








64 S: 






000001 








WAIT 




000000 








HALT 




012702 


010000 




2$: 


MOV 


#10000,R2 


012703 


020000 






MOV 


#20000, R5 


005004 








CLR 


R4 










.•VERIFY 


THAT EVERYTHING 


062304 






3$: 


ADD 


(R5)*,R4 


005504 








ADC 


R4 


077203 








SOB 


R2.3S 


020460 


014650 






CMP 


R4,CKSUM(R0) 


001401 








BEQ 


5$ 


000000 








HALT 




016006 


014200 




5$: 


MOV 


$$STP(R0).SP 


032770 


040000 


014160 




BIT 


#SW74.aSWR(R0) 


001320 








BNE 


TST2 



SET TEST NUMBER 
SET KERNAL MODE 
INIT. COUNTER 
INIT POINTER 

RESET THE CHECKSUM LOCATION 
DO CHECKSUM ON 2ND 4K(W) BANK 



.■POWER UP RETURN 
;USE UNIBUS EXERCISER? 
.BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



;WAIT FOR THE POWER TO FAIL 
;8AD 



; COMPARE NEW CHECKSUM WITH OLD 

.•BRANCH IF OK 
; ERROR 

.RESET THE STACK 
.LOOP ON TEST? 
.-LOOP TO TST2 

'***»*»**»*»*****»*»»**»»*»»»»»»•***»»***»**»»*»»»****•**»***»*< 



•TEST 3 



SIMPLE DOWN/UP TEST (SUPERVISOR) 



000003 
040000 
022120 
016740 

01702? 



172116 
177776 



TST3: 



MOV #3.8DISPLAY ;SET TEST NUMBER 

MOV #46000, 9#PS ;SET SUPERVISOR MODE 

MOV #2S.R3 ;SET POWER UP RETURN 

TST8 U8EF ;;USE UNIBUS EXERCISER? 

BEQ 64$ ; .-BRANCH IF NO 

ASRB LBELCK ;L0CK OUT OTHER CPUS FROM PRO r EEDlNG 
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64$: 
3$: 



SEQ 0041 



1399 


022076 


103375 




1400 


022100 


000241 




1401 


022102 


052737 


000020 


1402 


022110 






1403 


022110 






1404 


022110 


012737 


040000 


1405 


022116 


000001 




1406 


022120 


016006 


014200 


1407 


022124 


016004 


014200 


1408 


022130 


162704 


000004 


1409 


022134 


012402 




1410 


022136 


105737 


016740 


1411 


022142 


001004 




1412 


022144 


022702 


022120 


1413 


022150 


001401 




1414 


022152 


S% ^ A A A 

000000 




1415 


022154 


011402 




1416 


022156 


022702 


A / A A A A 

040000 


1417 


022162 


001401 




1418 


022164 


/■V /V AAA/% 

000000 




1419 


022166 






1420 


022166 


A 7 "7 "JA 

032770 


A/ AAA A 

040000 


1421 


022174 


001323 




14^2 








1423 








1424 








1425 








1426 








1427 


022176 






1428 


0221 76 


A 4 "^777 

012777 


A A AAA / 

000004 


1429 


022204 


012737 


4 / A AAA 

140000 


1430 


022212 


A 4 '77 A7 

012703 


A A A "7 C -\ 

022252 


4/74 

1431 


022216 


105737 


016740 


1432 


z\ aa a a a 

022222 


A A 4 / A 7 

001407 




1433 


02222U 


4 A/ "(71 

106237 


A 4 7 A "7 "7 

01 7022 


1434 


022230 


4 A 777f 

103375 




1435 


022232 


000241 




1436 


022234 


AC T777 

052737 


AAA AAA 

000020 


"437 


022242 






1438 


022242 






1439 


022242 


012737 


4 / A A A A 

140000 


1440 


022250 


000001 




1441 


022252 


016006 


A 4 y "7 A A 

0i4200 


1442 


022256 


016004 


A 4 / AAA 

014200 


1443 


022262 


4 M ~\ "7 A / 

162704 


AAA/VA/ 

000004 


1444 


022266 


A 4 "7 / A A 

01 2402 




1445 


a "7 7 A 

022270 


1 AC "77 "7 

105737 


A 4 A 7/ A 

016740 


4 / / £ 

1446 


022274 


AA4 A A / 

001004 




1447 


022276 


022702 


Am AC *7 

022252 


1448 


02250c 


0014U 1 




1449 


022304 


000000 




1450 


022306 


011402 




1451 


022310 


022702 


140000 


1452 


022314 


001401 




1453 


022316 


000000 




U54 


022320 


032770 


040000 



2$: 



70$: 



/2$: 



1$: 



•TEST 4 



171764 
177776 



TST4: 



170016 



177776 



64$: 
3$: 



2$: 

70$: 
72$: 



MOV 
MOV 
MOV 

TST8 

BEQ 

ASR8 

BCC 

CLC 

BIS 



BCC 


.-4 




CLC 






BIS 


#8IT4,i#U8CR2 


; ; SET TO POWER FAIL 


MOV 


#40000,a#PS 


;SET SUPERVISOR MODE 


WAIT 


;WAIT FOR THE POWER FAIL 


MOV 


$$STP(R0) .SP 


.-RESET 


MOV 


$$STP(R0) ,R4 




SUB 


#4,R4 




MOV 


(R4)*,R2 


;GET RETURN ADDRESS 


TST8 


UBEF 




BNE 


7^* 

72$ 




CMP 


#2$,R2 


.-CHECK ADDRESS 


BEQ 


.+4 


;SKIP IF OK 


HALT 




.•ADDRESS ON STACK IS WRONG 


■tow 
NUV 




• <tc T ni n 

. ut 1 ULU r5 


CMP 


#40000 ,R2 


.-CHECK OLD PS 


BEQ 


.+4 


.-SKIP IF OK 


HALT 




;0LD PS IS WRONG 


BIT 


#SW14.9SWR(R0) 


.-LOOP ON TEST? 


BNE 


TST3 


.-LOOP TO TST3 



SIMPLE DOWN/UP TEST (USER) 



#4, 80 1 SPLAY 

#140000.a#PS 

#2$.R3 

UBEF 

64$ 

UBELCK 

.-4 



SET TEST NUMBER 

SET USER MODE 

SET POWER UP RETURN 

;USE UNJ8US EXERCISER? 

•BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



#8JT4.a#UBCR2 ;;SET TO POWER FAIL 



0H160 



MOV 


#140000, a#ps 


SET USER MODE 


WAIT 


WAIT FOR THE POWER FAIL 


MOV 


$$STP(R0).SP ', 


•RESET SP 


MOV 


$$STP(R0).R4 


GET STACK INIT. VALUE 


SUB 


#4,R4 


MINUS 4 


MOV 


CR4)*,R2 


GET STACK-4.AUT0INC. STACK 


TST8 


UBEF 




BNE 


72$ 




CMP 


#2$.R2 


CHECK ADDRESS 


BEQ 


.+4 


SKIP IF OK 


HALT 




■ADDRESS ON STACK IS WRONG 


MOV 


(R4KR2 


GET OLD PS 


CMP 


#1 40000. R2 


• CHECK OLD PS 


BEQ 


.♦4 


;SKIP IF OK 


HAl T 




;0LD PS IS WRONG 


BIT 


#SWl4,iSWR(R0) 


.•LOOP ON TEST? 
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16:04 PAGE 30 



SfO 0042 



H55 

1456 

1457 

1458 

1459 

K60 

1461 

1462 

K63 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

1472 

H73 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 

1510 



022326 001323 



022330 
022330 
022336 
022342 
022350 
022354 
022360 
022362 
022366 
022370 
022372 
022400 
022400 
022404 
022410 
022414 
022416 
022424 
022424 
022426 
022434 
022442 



022444 
022444 
022452 
022456 
022464 
022470 
022474 
022500 
022502 
022506 
022510 
022512 
022520 
022520 
022524 
022526 
022534 
022534 
022540 
022542 



012777 
005037 
012760 
012703 
105737 
001407 
106237 
103375 
000241 
052737 

016006 
005737 
105737 
001403 
042737 

000000 
012760 
032770 
001332 



W2777 
005037 
012760 
012703 
012706 
105737 
001407 
106237 
103375 
000241 
052737 

005037 
000001 
012737 

105737 
001403 
042737 



040630 
040000 



BNE 



•TEST 5 



000005 171632 
1 77776 

022400 014702 

022426 

016740 

017022 



000020 170016 

014200 
000003 
016740 

000020 170016 



TST5: 



014702 
014160 



64$: 
3$: 



65S: 
1$: 



•TEST 6 



TST6: 



TST4 



.-LOOP TO TST4 



POWER FAIL WITH ODD ADDRESS 



MOV #5.8DISPLAV 

CLR WPS 

MOV #3$,ERRTAB(R0> 

MOV #1$.R3 

TST8 UBEF 

BEC 64$ 

ASRB U8ELCK 

BCC .-4 
CLC 

BIS «BIT4,a#UBCR2 

MOV $$STP(rO).SP 

TST 3*3 

TSTB UBEF 

BEQ 65$ 

BIC *8IT4.a#UBCR2 

HALT 

MOV #CPUER.ERRTAB(RO) 

BIT #SWl4,aSWR(R0> 

BNE TST5 



SET TEST NUMBER 
SET KERNAL MODE 
SET TRAP VECTOR 

SET RETURN ADDRESS FOR POWER FAIL 
;USE UNIBUS EXERCISER? 
.•BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



;SET TO POWER FAIL 
RESET STACK 

CAUSE ODD ADDRESS TRAP 
;USE UNIBUS EXERCISER? 



; CLEAR POWER FAIL ENABLE 

ODD ADDRESS TRAP FAILED 

.RESET 4 
LOOP ON TEST? 
LOOP TO TS T 5 



POWER FAIL IN THE RED ZONE 



000006 


171516 




MOV 


#6.aDISPLAY 


177776 






CLR 


HHPS 


022526 


014702 




MOV 


#2$. ERR TAB (RO) 


022560 






MOV 


#1$,R3 


000002 






MOV 


#2.SP 


016740 






TSTB 
BEQ 


UBEF 
64$ 


01 7022 






ASRB 

BCC 

CLC 


UBELCK 
.-4 


000020 


170016 


64$: 


BIS 


#8IT4.a#UBCR2 


177776 






CLR 
WAIT 


a*ps 


022534 


014662 


2$: 


MOV 


#7$,PWRTAB 






7$: 




016740 






TSTB 
BEQ 


UBEF 
65$ 


000020 


170016 




BIC 


*8IT4,S#UBCR2 



SET TEST NUMBER 
SET KERNAL MODE 
SET TRAP REGISTER 
SET POWER UP RETURN 
SET STACK TO RED ZONE 
;USE UNIBUS EXERCISER? 
.•BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



;;SET TO POWER FAIL 

;SET KERNAL MODE 

.WAIT FOR POWER FAIL TRAP 

;SET UVEC TO HALT 

;;USE UNIBUS EXERCISER? 

;; CLEAR POWER FAIL ENABLE 



lAINDEC-n- 

cfkbgc.pii 



•CEKBG-C 

1 3-MAP-80 



PDP-11/ 70 
16:04 



SYSTEM POWt* FAiL 
T6 POWER 



E 4 

MACY11 3OA(1052) 13-MAR- 
FAIL IN THE RED ZONE 
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SEO 0043 



1 SI 1 


022550 








1512 


022550 


000000 






1513 


022552 


012737 


033774 


014662 


15K 


022560 


016006 


014200 




1515 


022564 


012760 


040630 


014702 


1516 


022572 


01 3702 


000002 




1517 


022576 


021727 


000002 


000000 


1518 


022604 


001401 






1519 


022606 


000000 






1520 


022610 


01 3702 


000000 




1521 


022614 


022717 


040606 


000000 


1522 


022622 


001401 






1523 


022624 


000000 






1524 


022626 


032770 


040000 


OV. 160 


1525 


022634 


001303 






1526 










1527 










1528 










1529 










1530 










1531 


022636 








1532 


022636 


012777 


000007 


171324 


1533 


022644 


005037 


1 77776 




1534 


022650 


012760 


022706 


014702 


1535 


022656 


012703 


022740 




1536 


022662 


105737 


016740 




1537 


022666 


001407 






1538 


022670 


106237 


017022 




1539 


022674 


103375 






1540 


022676 


000241 






1541 


022700 


052737 


000020 


170016 


1542 


022706 








1543 


022706 


016006 


014200 




1544 


022712 


005037 


177776 




1545 


022716 


010037 


1 73000 




1546 


022722 


105737 


016740 




1547 


022726 


001403 






1548 


022730 


042737 


000020 


170016 


1549 


022736 








1550 


022736 


000000 






1551 


022740 


016006 


014200 




1552 


022744 


012760 


040630 


014702 


1553 


022752 


032770 


040000 


014160 


1554 
1555 


022760 


001326 














1556 










1557 










1558 










1559 










1560 


022 f 62 








1561 


022762 


012777 


000010 


171200 


1562 


022770 


005037 


1 77776 




1563 


0227^4, 


005037 


014602 




1564 


023000 


012760 


023070 


014702 


1565 


023006 


012706 


000400 




1566 


023012 


012703 


023050 





65$: 
1$: 



TST7: 



64$: 
3$: 



65$: 
1$: 



HALT 

MOV 

MOV 

MOV 

MOV 

CMP 

BEO 

HALT 

MOV 

CMP 

BEO 

HALT 

BIT 

BNE 



*TEST 7 



*POUDWN.PWRTAB 
$$STP(RO).SP 
#CPUER,ERRTAB(RO) 
3#2.R2 
**2.*0 
.♦4 

a*0.R2 
#PWRDIS,3#C 
.♦4 

#SW14,SSWR(R0) 

TST6 



ILLEGAL TRAP TO 4 
RESET DVEC 
RESET STACK 

.RESET 4 
GET FOR TYPING 
IS 2 OK? 
SKIP IF OK 
NO! 

GET FOR TYPING 
IS 0 OK? 
SKIP IF OK 
0 IS WRONG. 
LOOP ON TEST? 
LOOP TO TST6 



POWER FAIL WITH TIME OUT (KERNAL) 



MOV 


#7.3DI SPLAY 


SET TEST NUMBER 


CLR 


3#PS 


SET KERNAL MODE 


MOV 


#3$, ERR TAB (RO) '. 


SET TRAP VECTOR 


MOV 


#1$,R3 


•SET UP RETURN ADDRESS FOR POWER FAIL 


TST8 


UFJEF 


;USE UNIBUS EXERCISER? 


BEO 


64$ 


; .BRANCH IF NO 


ASRB 


U8ELCK 


;LOCK OUT OTHER CPUS FROM PROCEEDING 


BCC 


.-4 




CLC 






BIS 


*8IT4,a#UBCR2 


;;SET TO POWER C AIL 


MOV 


$$STP(RO).SP 


;SET STACK 


CLR 


i#PS 


.-SET KERNAL MODE 


MOV 


R0,a*1 73000 


; CAUSE A TIMEOUT 


TST8 


LBEF 


•;USE UNIBUS EXERCISER 7 


BEO 


65$ 




BIC 


«8IT4,a*UBCR2 


;; CLEAR POWER FAIL ENABLE 


HALT 




;TIMEOUT FAILED 


MOV 


$$STP(RO),SP ;SET STACK 


MOV 


#CPUER.ERRTAB(RO) .-RESET 4 


BIT 


#SW14.3SWR(R0) ;LOOP ON TEST? 


BNE 


TST7 


•LOOP TO TST7 



•TEST 10 POWER FAIL IN THE YELLOW ZONE (KERNAL) 

••••♦•a********************************************************* 

TST10: 



MOV #10,8DISPLAY 

CLR 3*PS 

CLR FLAG 

MOV #2$.ERRTAB(R0) 

MOV #400. SP 

MOV #1$.R3 



SET TEST NUMBER 
SET KERNAL MODE 
CLEAR THE FLAG 
SET SICK TPAP ADDRESS 
SET STACK TO YELLOW ZONE 
SET RETURN ADDRESS FOR POWER FAIL 



MAINDEC-11- 
CEKflGC.P1 1 



■CEKBG-C 

1 3-nAft-80 



PDP-11/ 70 
16:04 



SYSTEM POWER FAIL 
T10 POWER 



F 4 

MACY11 3OA(1052) 
FAIL IN THE YELLOW 



13-MAR-80 16: 
ZONE (KERNAL) 



04 PAGE 32 



SEO 004 <. 



1567 

1568 

1569 

1570 

1571 

1572 

1573 

1574 

1575 

1576 

1577 

1578 

1579 

1580 

1581 

1582 

1583 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 

1592 

1593 

1594 

1595 

1596 

1597 

1598 

1599 

1600 

1601 

1602 

1603 

1604 

1605 

1606 

1607 

1608 

1609 

1610 

1611 

1612 

1613 

1614 

1615 

1616 

1617 

1618 

1619 

1620 

1621 

1622 



023C16 
023022 
023024 
023030 
023032 
023034 
023042 
023042 
023046 
023050 
025050 
023054 
023056 
023064 
023064 
023066 
023070 
023076 
023102 
023104 
023112 
023112 
023116 
023120 
023126 
023126 
023130 
023136 
023140 
023144 
023146 
023150 
023150 
023156 



023160 
023160 
023166 
023172 
023176 
023202 
023206 
023210 
023214 
023216 
023220 
023226 
023226 
023230 
023232 
023234 
023236 



105737 
001407 
106237 
103375 
000241 
052737 

005037 
000001 

105737 
001403 
042737 

000000 
000430 
012760 
005737 
001016 
012737 

105737 
001403 
042737 

000000 
012737 
000404 
012703 
000002 
000000 

032770 
001301 



016740 






TST8 


UBEF 


;;USE UNIBUS EXERCISER? 






BEG 


64$ 


;;8RANCH IF NO 


u i fyjcc 






ACOQ 




•LOCK OUT OTHER CPUS FROM PROCEEDING 






BCC 


.-4 










CLC 






000020 


170016 




BIS 


*8IT4.a#UBCR2 


;;SET J POWER FAIL 




64$: 








1 77776 






CLR 


a#ps 


;SET KERNAL MODE 






WAIT 




.-WAIT FOR POWER FAIL 


016740 




1$: 


TST8 


UBEF 


;;USE UNIBUS EXERCISER? 






BEQ 


65$ 




000020 


170016 




BIC 


#8IT4.a#UBCR2 


; ."CLEAR POWER FAIL ENABLE 




65$- 














HALT 




.-POWER FAIL RETURNED TOO SOON 








BR 


4$ 


.-SKIP SP CHECK 


040630 


014702 


2$: 


MOV 


#CPUER,ERRTAB(RO) .-RESET 4 


014602 






TST 


FLAG 


;IS THE FIRST INSTRUCTION FLAG SET'' 






BNE 


5$ 


.YES 


023112 


014662 




MOV 


*7$.PWRTAB 


;SET UVEC TO HALT 


016740 




7$: 


TST8 


UBEF 


;;USE UNIBUS EXERCISER? 






BEQ 


66$ 




000020 


170016 




BIC 


*8IT4.a#UBCR2 


;; CLEAR POWER FAIL ENABLE 






66$: 














HALT 




;NOT ENOUGH OR TOO MANY INSTR. EXEC. 


033774 


014662 




MOV 


*P0WDUN,PWRTA8 


.SET DVEC 








no 

BR 


4$ 


.-GET OUT 


023150 




5$: 


MOV 


*4$,R3 


;SET RETURN 






RTI 


;G0 TO THE POWER FAIL ROUTINE 








HALT 




; SHOULD NOT RETURN HERE 


040000 


014160 


4$: 


BIT 


#SWK,aSWR(RO) 


.-LOOP ON TEST? 








BNE 


TST10 


.•LOOP TO TST10 



•TEST 11 POWER FAIL WITH RESETS 

•*»**»**»»*»»**»*********»**»»*»»*»»****************»»**»»*»»*»* 

TST 1 1 



012777 


000011 


171002 




MOV 


#11.iDISPLAY 


.-SET TEST NUMBER 


005037 


177776 






CLR 


a#ps 


;SET KERNAL MODE 


012703 


023236 






MOV 


n$,R3 


.-SET RETURN ADDRESS 


016006 


014200 






MOV 


$$STP(RO),SP 


.•RESET STACK 


105737 


016740 






TST8 


UBEF 


;;USE UNIBUS EXERCISER? 


001407 








BEQ 


64$ 


; .-BRANCH IF NO 


106237 


017022 






ASR8 


U8ELCK 


.-LOCK OUT OTHER CPUS FROM 


103375 








BCC 


.-4 




000241 








CLC 






052737 


000020 


170016 


64$: 


BIS 


*8IT4.a#UBCR2 


.-.-SET TO POWER FAIL 


000005 






3$: 


RESET 




.RESETS 


000005 








RESET 




;T0 WAIT 


000005 








RESET 




;IN 

.-LOOP 


000774 








BR 


3$ 


016006 


014200 




1$: 


MOV 


$$STP(RO).SP 


.-RESET STACK 



G 4 

MAINDfcC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 30AU052) 

rEKBGC .P1 1 13-MAR-80 16:04 T11 POWER FAIL WITH RESETS 



13-MAR-80 16:04 PAGE 33 



SEO 0045 



1623 


023242 


032770 


040000 


014160 


1624 


023250 


001343 






1625 










1626 










1627 










1628 










1629 










1630 


023252 








1631 


023252 


012777 


000012 


170710 


1632 


023260 


012737 


040000 


1 7777b 


1633 


023266 


012760 


023324 


014702 


1634 


023274 


012703 


023364 




1635 


023300 


105737 


016740 




1636 


023304 


001407 






1637 


023306 


106237 


01 7022 




1638 


023312 


103375 






1639 


023314 


000241 






1640 


023316 


052737 


000020 


170016 


1641 


023324 








164? 


023324 


016006 


014200 




1643 


023330 


012737 


040000 


177776 


1644 


023336 


005737 


000003 




1645 


023342 


005037 


1 77776 




1646 


023346 


105737 


016740 




1647 


023352 


001403 






1648 


023354 


042737 


000020 


170016 


1649 


023362 








1650 


023362 


000000 






1651 


023364 


016006 


014200 




1652 


023370 


01276C 


040630 


014702 


1653 


023376 


032770 


040000 


014160 


1654 


023404 


001 322 






1655 










1656 










1657 










1658 










1659 










1660 


023406 








1661 


023406 


012777 


000013 


170554 


1662 


023414 


012737 


040000 


1 77776 


1663 


023422 


012760 


023460 


014702 


1664 


023430 


012703 


023520 




1665 


023434 


105737 


016740 




1666 


023440 


001407 






1667 


023442 


106237 


017022 




1668 


023446 


103375 






1669 


023450 


000241 






1670 


023452 


052737 


000020 


170016 


1671 


023460 








1672 


023460 


016006 


014200 




1673 


023464 


012737 


040000 


1 77776 


1674 


023472 


010037 


173000 




1675 


023476 


005037 


177776 




1676 


023502 


105737 


016740 




1677 


023506 


001403 






1678 


023510 


042737 


000020 


170016 



BIT #SW14.3SWR(R0) .LOOP ON TEST? 
FJNE TST11 ;LOOP TO TST11 



•TEST 12 



POWER FAIL WITH ODD ADDRESS (SUPERVISOR) 



TST12: 



64$: 
3$: 



65$: 
1$: 



MOV 

MOV 

MOV 

MOV 

TST8 

BEG 

ASR8 

BCC 

CLC 

BIS 

MOV 

MOV 

TST 

CLR 

TST8 

BEQ 

BIC 

HALT 

MOV 

MOV 

BIT 

BNE 



#12.iDlSPLAY 

#40000. a#ps 

#3$,ERRTAB(R0) 

#1$.R3 

L6EF 

64$ 

U8ELCK 
.-4 



SET TEST NUMBER 
SET SUPERVISOR MODE 
SET TRAP VECTOR 

SET RETURN ADDRESS FOR POWER FAIL 
.USE UNIBUS EXERCISER? 
"FiRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



#8IT4,a#UBCR2 ;;SET TO POWER FAIL 



$$STP(RO).SP 
#40000. S#PS 

a#3 
a#ps 

UBEF 
65$ 

#8IT4.a#U8CR2 



RESET STACK 

SET SUPERVISOR MODE 

CAUSE ODD ADDRESS TRAP 

SET KERNAL MODE 

;USE UNIBUS EXERCISER? 

.-.CLEAR POWER FAIL ENABLE 



;ODD ADDRESS TRAP FAILED 
$$STP(RO),SP .RESET STACK POINTER 
#CPUER.ERRTAB(RO) ; RE SET 4 

#SWl4.aSWR(R0) .-LOOP ON TEST? 
TST12 ;LOOP TO TST12 



•*•»•*****•»*••********»»*»**»»»***»»»»»»»•»»»»»»»»•»••****•**** 

West 13 power fail with time out (supervisor) 
•»»••*••••*•**»*»*»****«**•*»****»*»*»**»**************•»***•**• 

TSTIT: 

;SET TEST NUMBER 
;SET SUPERVISOR MODE 
.SET TRAP VECTOR 

.SET UP RETURN ADDRESS FOR POWER FAIL 
;;USE UNJBUS EXERCISER? 
* 'BRANCH IF NO 

•LOCK OUT OTHER CPUS FROM PROCFEDING 



64$: 
3$: 



MOV 
MOV 
MOV 
MOV 

TSTB 
BEQ 
ASRB 
BCC 

CLC 
BIS 



#13,aDISPlAY 

#40000, a#ps 

#3$.ERRTAB(R0) 
#1$,R3 
UBEF 
64$ 

UBELCK 
.-4 



#8IT4,a#UBCR2 ;;SET TO POWER FAIL 



MOV 
MOV 
MOV 

CLR 
TSTB 
BEQ 
BIC 



$$STP(RO),SP 

#40ooo.a#ps 

R0,i#1 73000 

a#ps 

UBEF 
65$ 

#8IT4.i#UBCR2 



RESET STACK 

SET SUPERVISOR MODE 

CAUSE A TIMEOUT 

SET KERNAL MODE 

;USE UNIBUS EXERCISER? 

; ; CLEAR POWER FAIL ENABLE 



j 



MAINDEC-1 1- 

cekbgc.ph 



CEKBG-C 

1 3-MAR-80 



1679 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

168/ 

1688 

1689 

1690 

• 691 

1692 

1693 

1694 

1695 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

1712 

1713 

17H 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

1728 

1729 

1730 

1731 

1732 

1733 

1/34 



023516 
025516 
023520 
023524 
023532 
023540 



023542 
023542 
023550 
023556 
023564 
023570 
023574 
023576 
023602 
023604 
023606 
023614 
023614 
023620 
023626 
023632 
023636 
023642 
023644 
023652 
023652 
023654 
023660 
023666 
023674 



000000 
016006 
C12760 
032770 
001322 



012777 
0^2737 
012760 
012/03 
105737 
001407 
106237 
103375 
000241 
052737 

016006 
012737 
00573/ 
005037 
105737 
001403 
042737 

000000 
016006 
012760 
032770 
001322 



PDP-11/ 70 
16:04 



SYSTEM POWER FAIL 
T13 POWER 



H 4 

MACY11 30A(1052> 
FAIL WITH TIME OUT 



13-MAR-80 16: 
(SUPERVISOR) 



04 PAGE 34 



SEO 0046 



014200 
040630 
040000 



000014 
140000 
023614 
023654 
016740 

017022 



000020 

014200 
140000 
000003 
177776 
016740 



014200 
040630 
040000 



014702 
014160 



1 70420 
1 7^776 
014702 



170016 
177776 



000020 170016 



014702 
014160 



023676 








023676 


0*2777 


000015 


170264 


023704 


012737 


140000 


177776 


023712 


012760 


023750 


014702 


023720 


012703 


024010 




023724 


105737 


016740 




023730 


001407 






023732 


106237 


017022 




023736 


103375 






023740 


000241 






023742 


052737 


000020 


170016 


023750 








023750 


016006 


014200 




023754 


012737 


140000 


177776 


023762 


010C37 


1 73000 





65$: 
IS: 



HALT 

MOV 

MOV 

BIT 

BNE 



; TIMEOUT FAILED 
$$STP(RO).SP .RESET STACK 
#CPUER,ERRTAB(RO) ; Rt SE T 4 

#SWl4.aSWR(RC) ;LOOP ON TEST? 
TST13 ;LOOP TO TST13 



;*TEST 14 



POWER FAIL WITH ODD ADDRESS (USER) 



TST14: 



64$: 
3$: 



65$: 
1$: 



MOV 
MOV 
MOV 
MOV 

TST8 

BEO 

ASR8 

BCC 

CLC 

BIS 

MOV 

MOV 

TST 

CLR 

TST8 

BEO 

BIC 

HALT 

MOV 

MOV 

BIT 

BNE 



#14 £ 3DISPLAY 

#1 40000, i#PS 

*3$,ERRTAB(R0) 

#1$.R3 

U8EF 

64$ 

UBELCK 

.-4 



SET TEST NUMBER 
SET USER MODE 
SET TRAP VECTOR 

SET RETURN ADDRESS FOR POWER FAIL 
.USE UNI BUS EXERCISER? 
; BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



*8IT4.a#UBCR2 ;;SET TO POWER FAIL 



$$STP(RO),SP 
*1 40000. a#PS 

a*3 
a*ps 

U8EF 
65$ 

*8JT4.a#UBCR2 



$$STP(R0),SP 



RESET STACK 

SET USER MODE 

CAUSE ODD ADDRESS TRAP 

SET KERNAL MODE 

.USE UNIBUS EXERCISER? 

;; CLEAR POWER FAIL ENABLE 

;ODD ADDRESS TRAP FAILED 
; RE SET SP 



#CPUER,ERRTAB(RO) .-RESET 4 

#SW14,3SWR(R0> ;LOOP ON TEST? 
TST14 .-LOOP TO TST14 



••**»*********»»»*»****»****»»»**»*»»***»*»***»*»******»**»*»»•»» 

•West 15 power fail with time out (user) 
••**•******•• ************************** ****** ***•*••••••• **•••**• 

TST 1 5 : 

;SET TEST NUMBER 
;SET USER MODE 
;SET TRAP VECTOR 

;SET UP RETURN ADDRESS FOR POWER FAIL 
;;USE UNIBUS EXERCISER? 
.-.•BRANCH IF NO 

; LOCK OUT OTHER CPUS FROM PROCEEDING 



64$: 
3$: 



MOV 
MOV 
MOV 
MOV 
TST8 
BED 
ASR8 
BCC 
CLC 
BIS 



#15.8DISPLAY 
#KOOOO,a#PS 
*3$,ERRTAB(R0) 
#1$.R3 
U8EF 
64$ 

U8ELCK 
.-4 



#BIT4.a#U8CR2 ;;SET TO POWER FAIL 



MOV 
MOV 
MOV 



$$STP(RO).SP 
#140000. OTPS 
R0.a#1 73000 



.-RESET STACK 
.-SET USER MODE 
.-CAUSE A TIMEOUT 



HAINDEC-11-CEKBG-C PDP-11/ 70 

CEKBGC.P11 13-MAR-80 16:04 



SYSTEM POWER 
T15 



1735 


023766 


005037 


1 77776 


1736 


023772 


105737 


016740 


1 737 


023776 


001403 




1738 


024000 


042737 


000020 


1739 


024006 






1740 


024006 


000000 




1/41 


024010 


016006 


014200 


1742 


024014 


012760 


040630 


1743 


024022 


032770 


040000 


1744 


024030 


001 322 




1745 








1746 








"•747 








1748 








1749 








1750 


024032 






1751 


024032 


012777 


000016 


1752 


024040 


005037 


1 77776 


1753 


024044 


012760 


004000 


1754 


024052 


012760 


024152 


1755 


024060 


004737 


033406 


1756 


024064 


012737 


024126 


1757 


024072 


012703 


024154 


1758 


024076 


005237 


177572 


1759 


024102 


105737 


016740 


1760 


024106 


001407 




1761 


024110 


106237 


017022 


1762 


024114 


103375 




1763 


024116 


000241 




1764 


024120 


052737 


000020 


1765 


024126 






1766 


024126 


016006 


014200 


1767 


024132 


005237 


140000 


1768 


024136 


105737 


016740 


1769 


024142 


001403 




1770 


024144 


042737 


000020 


1771 


024152 






1772 


024152 


000000 




1773 








1774 
1775 


024154 


005037 


177572 


024160 


016006 


014200 


1776 


024164 


012760 


040630 


1777 


024172 


032770 


040000 


1/78 


024200 


001314 




1779 


024202 


005077 


167762 


1780 


024206 


105737 


016737 


1781 


024212 


001002 




1782 


024214 


000137 


035*26 


1783 


024220 






1/84 








1785 








1786 








1787 








1788 








1789 








1790 









170016 



014702 
014160 



1 701 30 

014612 
014702 

000250 



170016 



170016 



014702 
014160 



FAIL 
POWER 

CLR 
TST8 
BEQ 
BJC 

HALT 

MOV 

MOV 

BJT 

BNE 



• ••*••••***••< 

•TEST 16 



65S: 
1$: 



I 4 

MACY11 30A(1052> 
FAIL WITH TIME OUT 

i*PS 
UBEF 
65$ 

#8JT4.a#UBCR2 



13-MAR-80 

(USER) 



16:04 PAGE 35 



SEO 0047 



;SET KERNAL MODE 
;;USE UNIBUS EXERCISER? 

;; CLEAR POWER FAIL ENABLE 



.•TIMEOUT FAILED 
$$STP(RO).SP .-RESET STACK 
#CPUER,ERRTAB(RO) .-RESET 4 

#SWK,aSWR<RO) .-LOOP ON TEST? 
TST15 .-LOOP TO TST15 



»**»***»**»***»*************»***************•***•< 
MEMORY MANAGEMENT ABORT TEST 



TST16: 



64$: 
3$: 



65$: 
4$: 

1$: 
2$: 



5$: 



MOV 

CLR 

MOV 

MOV 

JSR 

MOV 

MOV 

INC 

TSTB 

BEQ 

ASR8 

BCC 

CLC 

BIS 

MOV 

INC 
TSTB 
BEO 
BIC 

HALT 

CLR 

MOV 

MOV 

BIT 

BNE 

CLR 

TSTB 

BNE 

JMP 



#16,8DISPLAY 
a*PS 

#TI, PFFT(RO) 

#4$.ERRTAB(R0) 

PC, MAP 

#3$.3*MMVEC 

#1$.R3 

3*MMR0 

UBEF 

64$ 

UBELCK 
.-4 



SET TEST NUMBER 
SET KERNAL MODE 

.-TIME THIS POWER FAIL 
SET FOR TIMEOUT 
MAP THE WORLD 

SET MEMORY MANAGEMENT VECTOR 
LOAD PF RETURN 
TURN MEMORY MANAGEMENT ON 
.-USE UNIBUS EXERCISER? 
.-BRANCH IF NO 

LOCK OUT OTHER CPUS FROM PROCEEDING 



*8IT4.3#UBCR2 ;;SET TO POWER FAIL 



$$STP(RO).SP 

an 40000 

UBEF 
65$ 

*8IT4.a#UBCP2 



a#MMR0 

$$STP(RO),SP 
*CPU£R,ERRTA8(R0) 
#SWl4,aSUR(R0) 
TST16 
3DISPLA 
MPF 
5$ 

$EOP 



ZAP STACK 

ACCESS VIOLATION 

;USE UNJBUS EXERCISER? 

.CLEAR POWER FAIL ENABLE 

NO VIOLATION OR TRAP TO 

TURN OFF MEMORY MANAGEMENT 
MAKE A NEW STACK 

.•RESET 4 
LOOP ON TEST? 
LOOP TO TST16 

CLEAR THE DISPLAY REGISTER. 
MP MODE? 
BRANCH IF YES 
UUMP INTO EOP 
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SEO 0048 



1791 










1792 










1793 










1794 










1795 










1796 










1797 










1798 










1799 










1800 










1801 










1802 










1803 










1804 










1805 










1806 










1807 










1808 










1809 










1810 










1811 










1812 










1813 










1814 










1815 










1816 










1817 


024220 


012703 


024244 




1818 


024224 


106237 


016776 




1819 


024230 


103373 






1820 


024232 


005237 


016716 




1821 


024236 


012737 


000001 


016776 


1822 


024244 


023737 


016716 


016774 


1823 


024252 


001374 






1824 


024254 


005700 






1825 


024256 


001002 






1826 


024260 


104401 


041635 




1827 


024264 








1828 


024264 


052777 


100000 


172536 


1829 


024272 


016006 


014200 




1830 


024276 


106237 


017026 




1831 


024302 


103375 






1832 


024304 


012737 


034464 


000024 


1833 


024312 


012737 


000340 


000026 


1834 


024320 


017705 


172504 




1835 


024324 


072527 


177770 




1836 


024330 


010560 


014240 




1837 


024334 


005002 






1838 


024336 


026205 


014226 




1839 


024342 


001404 






1840 


024344 


005722 






1841 


024346 


020227 


000010 




7842 


024352 


002771 






1843 


024354 


010200 






1844 


024356 


010001 






1845 
1846 


024360 


006201 






024362 


012760 


034656 


014662 



;*********************************»****************»****************»* 
;•*•*******•*************•*•••*****•***••*•*••••*•*•**********•**••••« 
;************»**** ************** 

I ***************** SECTION TWO ************** 

;***************** ••***••***•*»• 
;**************** ******* ****•******•***•*•***•**••*•*••***•*•*• ******* 
'A******************************************************************** 



SEC2: 

1$: 

3$: 
2$: 



65$: 



64$: 



.S8TTL 

MOV 

ASRB 

BCC 

INC 

MOV 

CMP 

BNE 

TST 

BNE 

TYPE 

BIS 

MOV 

ASRB 

BCC 

MOV 

MOV 

MOV 

ASH 

MOV 

CLR 

CMP 

BEO 

TST 

CMP 

BLT 

MOV 

MOV 

ASR 

MOV 



SECTION 2 INITIALIZATION 
#1$. R3 
SYNC. 3 
SEC2 
S2L0G1 

Ml. SYNC. 3 

S2L0G1.CPUACT 
1$ 
RO 
3$ 

.TM15 



#8IT15, 3ACR 
$$STP(RO) , 
S2L1 
2$ 

#$POW£R.a#24 
#340.8*26 
iACR, R5 
#-10, R5 

R5. 

R2 

$CPUID(R2).R5 
64$ 
(R2; + 
R2.#10 
65$ 
R2.R0 
RO, R1 
R1 

#$PWRDN. 



SP 



;SET UP POWER FAIL RETURN IN CASE 
; CONTROL THE ENTRY 

LOG INTO SEC2 
LET THE OTHERS IN 
;WAIT FOR EVERYONE TO GET ... 
'HERE 

;JS THIS THE MASTER? 
.-BRANCH IF NO 
.•"ENTERING SECTION 2" 

INITIALIZE IIST 
SET THE STACK 

; TRY TO ENTER SECTION 2 INITIALIZATION 
;;SET NEW POWER FAIL HANDLER 



.-COPY ACR 
:GET THE ID 
$REGO(RO); IDENTIFY CPU FOR ERROR TYPE-OUT 
; RE SET FOR COUNT 
;SID MATCH? 

; INCREMENT R2 BY 2 



;MOV LOGICAL ID TO 2ND OPERAND 
;SET UP R1 



PWRTAB(RO) 



.-SET UP FOR POWER DOWN 



HMNDEC-1 1-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 



CEKBGC.PH " 13-MAR-80 16:04 SECTION 2 INI 1 

1847 024370 012760 024664 014702 SIZMBS: MOV 
1848 

1849 024376 052737 000040 176710 BIS 

1850 024404 012760 040630 014702 MOV 

1851 024412 005002 CLR 

1852 024414 010237 176710 RPSRC: MOV 

1853 024420 032737 040000 176712 BIT 

1854 024426 001024 BNE 
1855 

1856 024430 032737 001000 176712 BIT 

1857 024436 001403 BEQ 

1858 024440 005260 016742 INC 

1859 024444 000415 BR 

1860 024446 032737 000400 176712 1$: BIT 

1861 024454 001411 BEQ 

1862 024456 005060 014632 CLR 

1863 024462 013703 176710 MOV 

1864 024466 042703 177770 BIC 

1865 024472 110360 014632 MOVB 

1866 024476 000454 BR 

1867 024500 005202 NX T DRV: INC 

1868 024502 020227 000010 CMP 

1869 024506 103742 BLO 

1870 024510 005760 016742 TST 

1871 024514 001011 BNE 

1872 024516 104401 041750 NORH70: TYPE 

1873 024522 016046 014226 MOV 

1874 024526 104405 TYPDS 

1875 024530 012760 001400 014632 MOV 

1876 024536 000434 BR 

1877 024540 005002 A: CLR 

1878 024542 010237 176710 10$: MOV 

1879 024546 032737 001000 17671? BIT 

1880 024554 001005 BNE 

1881 024556 005202 INC 

1882 024560 020227 000010 CMP 

1883 024564 103766 BLO 

1884 024566 000000 HALT 

1885 024570 110260 014632 15$: MOVB 

1886 024574 052760 001000 014632 BIS 

1887 024602 104401 043752 TYPE 

1888 024606 010246 MOV 

1889 024610 104405 TYPDS 

1890 024612 104401 044000 TYPE 

1891 024616 016046 014226 MOV 

1892 024622 104405 TYPDS 

1893 024624 104401 044014 TYPE 

1894 024630 012737 000001 017026 SI ZEND: MOV 

1895 024636 005237 016720 INC 

1896 024642 023737 016774 016720 1$: CMP 

1897 024650 001374 BNE 

1898 024652 012777 040602 172154 MOV 

1899 024660 000137 024674 JMP 
1900 

1901 024664 000240 NORP: NOP 

1902 024666 012716 024516 MOV 



K 4 

MACY11 30A(1052) 
IALIZATION 

*NORP,ERRTAB(R0) 

#BIT5.S#RPCS2 

#CPUEP.ERRTAB(RO> 

R2 

R2,S#RPCS2 

#BITK.a#RPDS 

NXTDRV 

#8IT9,a#RPDS 
1$ 

RPPGM(RO) 

NXTDRV 

*8IT8,3#RPDS 

NXTDRV 

MBDSW(RO) 

a#RPCS2.R3 

*1 77770. R3 

R3.MBDSW(R0) 

SI ZEND 

R2 

R2,*10 
RPSRC 
RPPGM(RO) 
A 

# TM101 

$CPUID(RO).-(SP) 

*1400.MBDSW(R0> 

SIZEND 

R2 

R2.a#RPCS2 

#8IT9,a#RPDS 

15$ 

R2 

R2.*10 
10$ 

R2,MBDSU(R0) 

#BJT9.MBDSW(R0) 

,$PGM1 

R2, -(SP> 



,$PGM2 

$CPUID(R0>, -(SP) 

,$PGM3 

#1.S2L1 

S2L0G2 

CPUACT,S2L0G2 
1$ 

/NSTDIS.aiSTVEC 
TST17 
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;;SET UP CPU ERROR VECTOR IN CASE 

;; THERE'S NO RPO/5/6 

;;INIT. RP CONTROLLER. IF THERE. 

; ; RE SET ERROR VECTOR 

.-.RESET COUNTER 

;;SET DRIVE * IN CS REG. 

;.IS THE DRIVE UP? 

.-.•BRANCH IF IT ISN'T 

;;IS THE PGM BIT SET FOR THIS DRIVE 

;;YES, FLAG THE CONDITION 
;;AND. SEARCH FOR ANOTHER DRIVE 
;;IS THIS PORT IN CONTROL? 
;;N0, LOOK FOR ANOTHER 
.-.CLEAR MASSBUSS DEVICE SELECTION 
• ' COPY CS2 

;;GET RID OF OTHER INFO 

; .-WRITE DRIVE ID INTO SELECTION W 

;; DEVICE HAS BEEN FOUND. 

;;NEXT DRIVE 

;;ALL DRIVES TESTED? 

;;N0. TEST SOME MORE. 

;;ANY PROGRAMMABLE DRIVES? 

• *YES 

••'No'mASSBUS DEVICE AVAILABLE ON CPU 
;;SAVE $CPUID(RO) FOR TYPEOUT 
;G0 TYPE — DECIMAL ASCII WITH SIGN 
;;SET CODE FOR NO DEVICE 
;;EXIT SECTION 2 INITIALIZATION 
; .-RESET COUNTER 
.-.ACCESS DRIVE. 
;;PGM BIT SET? 
;;YES, FOUND ONE 
;;N0. NEXT DRIVE 

DRIVE TESTED 



SEQ 0049 



.' ."ALL 

;;N0. 

;;YES. 

;;SET 

;;SET 

.-TYPE 



DRIVE * 
PGMBIT 
SHARED DRIVE 



WARNING MSG 



*NORH70.(SP) 



; .-ALLOW ENTRY INTO SEC. 2 

.-.LOG OUT OF SECTION 2 INITIALIZATION 

.WAIT FOR ALL THE CPUS TO GET HERE 

.-.POINT TO DISPATCHER 
.-START THE TEST 

.THERE IS NO RP CONTROLLER 
; ; SET FOR TEST ENTRY RETURN 



L 4 

HMNDfcC-1'i-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 30AH052) 

CEKBGC.P11 13-MAR-80 16:04 SECTION 2 INITIALIZATION 



1903 

190*. 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 

1913 

19H 

1915 

1916 

1917 

1918 

1919 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

1952 

1953 

1954 

1955 

1956 

1957 

^958 



024672 000002 



RTI 
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;; RE TURN 



SEO 0050 



024674 
024674 



024702 
024706 
024714 
024720 
024722 

024730 
024732 
024736 
024740 
024742 
024746 
024750 
024756 
024762 
024770 
024774 
025000 
025004 
025010 
025014 
025016 
025024 
025030 
025036 

025042 
025044 
025046 

025050 
025056 
025062 
025064 
025066 
025072 
025074 
025100 



;***************************«*****•»*****»****»**»*«»*******»»*« 

•TEST 17 CHECK 'BRK' & *DCF' FLAGS DURING POWERFAJL 



012777 000017 167266 



TST17: 



016006 
052777 
106277 
103375 
027737 

001021 
013702 
005302 
006302 
027702 
001005 
012777 
000137 
062777 
005077 
005277 
005037 
005037 
020077 
001005 
012777 
000137 
012777 
000137 

016722 
016724 
017004 

112761 
010037 
005700 
001007 
104401 
005046 
116116 
104403 



014200 
100000 
000126 

000114 
016774 

000076 

000001 
025524 
000002 
000046 
000042 
014642 
014714 
000030 

000001 
025050 
000001 
025172 



000017 
017062 



041713 
014002 



172114 
016774 



70$: 



000070 
000054 



64$: 
65$: 



000022 
000010 



66$: 



67$ 
68$ 
69$ 



014002 TS1 7A: 



MOV J17.3DISPLAY .SET TEST NUMBER 
;;***»»*•»»***»»** TS17A-F0RK 



MOV $$STP(RO), 

BIS #8IT15, SACR 

ASRB 969$ 

BCC 70$ 

CMP 367$,CPUACT 

BNE 65$ 

MOV CPUACT,R2 

DEC R2 

ASL R2 

CMP 368$. R2 

BNF 64$ 

MOV #1 , 569$ 

JMP TST20 

ADD #2. «68$ 

CLR 367$ 

INC 367$ 

CLR SIGNAL 

CLR SYNC. 2 

CMP R0.368$ 

BNE 66$ 

MOV #1 ,369$ 

JMP TS17A 

MOV #1 ,369$ 

JMP TS17B 



SP;SET UP THE STACK 
.•INITIALIZE THE 1 1ST 
.-ENTER CONTROL FORK 

;HAVE WE REACHED THE END OF THE 
.•ROUTING CYCLE? 
.•BRANCH IF NO 



(CPUACT-1W 

ARE WE AT THE END OF THE TEST? 

BRANCH IF NO 

EXIT 

; INCREMENT 68$ BY 2 
CLEAR THE CHECKPOINT COUNTER 
INCREMENT CHECKPOINT 
CLEAR SIGNAL LOCK 
CLEAR THE LOCK 

ROUTE THIS PROCESSOR THROUGH TS17A? 
BRANCH IF NO 
CLEAR LOCK 

JUMP TO BRANCH TS17A 
CLEAR LOCK 
JUMP TO TS17B 



*»**************»»******»*«»*»**»*****.«,*»*»*».*.»».«. 



C1 
C2 

C3 

Move 

MOV 

TST 

BNE 

TYPE 

CLR 

M0V8 

TYPOS 



#17. 
RO.PUT 
RO 
5$ 

,TM77 
-<SP) 

$TSTNM(R1),(SP) ;GET THE TEST NO 



$TSTNM(R1) ;SET UP THE TEST NUMBER 

SET PROCESSOR UNDER TEST 
IS THIS THE MASTER? 
BRANCH IF NO 
"TEST" 



MMNDEC-n-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 



EKBGC. 


pn 


1 3-MAR-80 


16:04 




T17 


CHECK 


1959 


025102 


000002 








.WORD 


1960 


025104 








5$: 




1961 


025104 


104401 


041724 






TYPE 


1962 


025110 


016046 


014226 






MOV 


1963 


025114 


104405 








TVPDS 


1964 


025116 


104401 


014333 






TYPE 


1%5 


025122 


012760 


014020 


014612 




MOV 


1966 


025130 


012760 


025160 


014672 




MOV 


1967 


025136 


005003 








CLP. 


1968 


025140 


005037 


014642 






CLP. 


1969 


025144 


012737 


000001 


014714 




MOV 


1970 


025152 


000001 








WAIT 


1971 


025154 


000137 


024674 






JMP 


1972 














1973 














1974 


025160 


1 04025 






BAD: 


ERROR 


1975 


025162 


000000 








HALT 


1976 


025164 


012716 


024674 






MOV 


1977 


025170 


000002 








PTI 


1978 














1979 


025172 


112761 


000017 


014002 


TS178: 


M0V8 


1980 


025200 


106237 


014714 






ASR8 


1981 


025204 


103372 








BCC 


1982 


025206 


005237 


016764 






INC 


1983 


025212 


023737 


016764 


016770 




CMP 


1984 


025220 


001404 








BEQ 


1985 


025222 


012737 


000001 


014714 




MOV 


1986 


025230 


000402 








BR 


1987 


025232 


005037 


016764 




2$: 


CLR 


1988 


025236 


104401 


014220 




5$: 


TYPE 


1989 


025242 


012760 


025160 


014672 




MOV 


1990 


025250 


012777 


000001 


171552 




MOV 


1991 


025256 


052777 


000004 


171546 




BIS 


1992 














1993 


025264 


012777 


000007 


171536 




MOV 


1994 


025272 


017705 


171534 






MOV 


1995 


025276 


012760 


025376 


014672 




MOV 


1996 


025304 


106237 


014642 




1$: 


ASRB 


1997 


025310 


103375 








BCC 


1998 


025312 


012737 


000001 


014642 




MOV 


1999 


025320 


01 7760 


171504 


014250 




MOV 


2000 


025326 


012777 


000000 


171474 




MOV 


2001 


025334 


017760 


171472 


014260 




MOV 


2002 


025342 


01 7760 


171464 


014270 




MOV 


2003 


025350 


104020 








ERROR 


2004 


025352 


005237 


016766 






INC 


2005 


025356 


023737 


016766 


016770 




CMP 


2006 


025364 


001002 








BNE 


2007 


025366 


005037 


016766 






CLR 


2008 


025372 


000137 


024674 




10$: 


JMP 


2009 


025376 








STS17: 




2010 


025376 


012777 


000007 


171424 




MOV 


2011 


025404 


013703 


017062 






MOV 


2012 


025410 


016304 


014226 






MOV 


2013 


025414 


012703 


000401 






MOV 


2014 


025420 


072304 








ASH 



M 4 
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SEO 0051 



2 ;TYPE 2 DIGITS. NO LEADING 0 

.TM100 POWER FAIL CPU #" 

$CPUID(R0),-(SP) ;;SAVE SCPUID(RO) FOR TYPEOUT 

;;G0 TYPE — DECIMAL ASCII WITH SIGN 

,$CRLF 

#SSU!TI!NCX.PFFT(RO> ; SEND SIG. ON UP, TIME, DON'T SAVE MM 
#BAD.ISTTAB(RO> ;SET UP 1 1ST VECTOR FOR THIS CPU. 
R3 ; RE TURN AFTER THE WAIT ON POWER UP 

SIGNAL ; CLEAR THE POWER UP SIGNAL 

#1, SYNC. 2 ; UNLOCK THE OTHER CPUS 

;UAIT FOR THE POWER TO FAIL. 
TST17 ;G0 TO CONTROL FORK 



25 

#TST17, (SP) 



.•UNEXPECTED CPU INTERRUPT 
.•CONTINUE TESTING 



#17. $TSTNM(R1 ) ;SET UP THE TEST NUMBER 

SYNC. 2 ;WAIT FOR P.U.T. TO SEND SIGNAL 

1S17B ;LOOP UNTIL SENT 

L0G1 .-COUNT CPU'S COMING THRU 

L0G1.CPULS1 ,-ALLHERE? 

2$ ;YES - SKIP 

#1, SYNC. 2 ;N0, LET NEXT ONE IN 

5$ ;THEN CONTINUE 

L0G1 ;LAST ONE INITIALIZES COUNTER 

.SNULL :FLUSH THE TYPE QUEUE 

#BAD. ISTTAB(RO) ;GET SET FOR BAD INTERRUPT 

#PGCS,aACR .-ACCESS PGCS REGISTER 

#8IT2.aADR .-SET THE INTERRUPT ENABLE BIT 

#DCF,8ACR .'COPY THE DCF REG. 

3ADR.R5 ;INTO R5 

#STS17. ISTTAB(RO) ;SET FOR EXPECTED INTERRUPT 



SIGNAL 
1$ 

#1, SIGNAL 

SACR.SREG1 (RO) 

#PGTE,3ACR 

iADR.tREG2(R0) 

aADR,SREG3(R0) 

20 

L0G2 

L0G2.CPULS1 
10$ 
L0G2 
TST17 

#DCF,3ACR 
PUT,R3 

$CPUID(R3).R4 
#401 ,R3 
R4.R3 



WAIT ON POWER FAIL SIGNAL 

LET ANOTHER IN 
SAVE THE ACR 
ACCESS THE PGTE REG. 
SAVE THE PGTE REG. 
SAVE THE PGCS REG. 
NO I I ST INTERRUPT 
COUNT CPU'S GOING OUT 
ALL DONE? 
NO - SKIP 

YES. INIT FOR NEXT CYCLE 
DO IT AGAIN 

ACCESS DCF REGISTER 
GET LOGICAL ID INTO R3 
COPY 1 1ST ID TO DESTINATION. 
MAKE A MASK 

BRING IT INTO POSITION 



N 4 
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SEQ 0052 



2015 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

2039 

2040 

2041 

2042 

2043 

2044 

2045 

2046 

2047 

2048 

2049 

2050 

2051 

2052 

2053 

2054 

2055 

2056 

2057 

2058 

2059 

2060 

2061 

2062 

2063 

2064 

2065 

2066 

2067 

2068 

2069 

2070 



025422 
025424 
025426 
025432 
025434 
025436 
025442 
025446 
025450 
025454 
025460 
025464 
025466 
025472 
025500 
025502 
025510 
025512 
025516 
025522 



025524 
025524 



025532 
025536 
025544 
025550 
025552 

025560 
025562 
025566 
025570 
025572 
025576 
025600 
025606 
025612 
025620 
025624 
025630 
025634 
025640 
025642 
025650 
025654 
025662 



050305 
077301 
017702 
020205 
001405 
010260 
010560 
104021 
005060 
104401 
106237 
103375 
005237 
023737 
001404 
012737 
000402 
005037 
012716 
000002 









BIS 


R3.R5 


;R5 IS WHAT THE DCF REG. SHOULD LOOK LIKE 








SOB 


R3. 


.-DELAY A SHORT WHILE 


171400 






MOV 


3ADR.R2 .COPY 
R2.R5 


DCF REGISTER 








CMP 


.•EVERYTHING OK? 








BEO 


3$ 


.•BRANCH IF YES 


014250 






MOV 


R2.SREG1 (RO) 


;THE DCF REG. 


014260 






MOV 


R5.$REG2<R0) 


;WHAT IT SHOULD BE 






ERROR 


21 


.■INCORRECT DCF REG. BITS 


017012 




3$: 


CLR 


NOPRMP(RO) 




045163 






TYPE 


, TM1 1 1 


; INTERRUPT AS EXPECTED 


014712 




4$: 


ASR8 
BCC 


SYNC. 1 
4$ 


;WAIT FOR POWER-UP 


016766 






INC 


L0G2 


.•COUNT CPU'S GOING OUT 


016766 


016770 




CMP 
BEQ 


L0G2.CPULS1 
6$ 


ai i r\/"v»if" ^ 

.ALL DONE? 
•YES - SKIP 


000001 


014712 




MOV 
BR 


#1.SYNC1 
7$ 


;ELSE LLET NEXT ONE IN 


016766 




6$: 


CLR 


L0G2 


.-LAST ONE INITS COUNTER 


024674 




7$: 


MOV 
RTI 


XTTST17, (SP) 


.•CONTINUE 



012777 000020 166436 



•***»**********»»**»**»»***»**********»***»***»»»»*»*»********** 

•TEST 20 CHECK POWERFAIL DURING HIGH MEMORY ACTIVITY 

■****»*»»*»**»**»******************»*****»**»*****»****»**»»**** 

TST20: 

MOV #20,3DISPLAY ;SET TEST NUMBER 
;;**************** TS20A-F0RK ************************** 



016006 
052777 
106277 
103375 
0277S7 

001021 
013702 
005302 
006302 
027702 
001005 
012777 
000137 
062777 
005077 
005277 
005037 
020077 
001005 
012777 
000137 
012777 
000137 



014200 
100000 
000122 

000110 



016774 



000072 

000001 
026114 
000002 
000042 
000036 
014714 
000030 

000001 
025674 
000001 
026006 



171264 
016774 



000064 
000050 



000022 
000010 



MOV $$STP(RO). 

BIS *8IT15. 3ACR 

70$: ASRB 369$ 

BCC 70$ 

CMP 367$,CPUACT 

BNE 65$ 

MOV CPUACT.R2 

DEC R2 

ASL R2 

CMP 368$, R2 

BNE 64$ 

MOV #1 , 369$ 

JMP TST21 

64$: ADD »2. 368$ 

CLR 367$ 

65$: INC 367$ 

CLR SYNC. 2 

CMP R0.368$ 

BNE 66$ 

MOV *1 .369$ 

JMP TS20A 

66$: MOV * 1.369$ 

JMP TS20B 



SP;SET UP THE STACK 
.•INITIALIZE THE 1 1ST 
.-ENTER CONTROL FORK 

.-HAVE WE REACHED THE END OF THE 
.•ROUTING CYCLE? 
.•BRANCH IF NO 



(CPUACT-1)*2 

ARE WE AT THE END OF THE TESn 

BRANCH IF NO 

EXIT 

.•INCREMENT 68$ BY 2 
CLEAR THE CHECKPOINT COUNTER 
INCREMENT CHECKPOINT 
CLEAR THE LOCK 

ROUTE THIS PROCESSOR THROUGH TS20A 7 
BRANCH IF NO 
CLEAR LOCK 

JUMP TO BRANCH TS20A 
CLEAR LOCK 
JUMP TO TS20B 



**»»**«*•»*******»*****•»»***»********•»»*»»»***»»*»*»* 



•WINOEC-1 1-CEKBG-C 
CEKBGC.P11 13-MAR-80 



PDP-11 /70 
16:04 



SYSTEM POWER 
T20 



^07 1 
3072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2083 
2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 



025666 
025670 
025672 
025674 
025702 
025706 
025710 
025712 
025716 
025720 
025724 
025726 
025730 
025730 
025734 
025740 
025742 
025746 
025754 
025756 
025764 
025766 
025772 
026000 
026002 

026006 
026014 
026020 
026022 
026026 
026034 
026036 
026044 
026046 
026052 
026056 
026062 
026064 
026066 
026070 
026072 
026074 
026100 
026102 
026110 



016726 
016730 
017006 
112761 
010037 
005700 
001007 
104401 
005046 
116116 
104403 
000002 

104401 
016046 
104405 
104401 
012760 
005003 
023737 
001374 
005037 
012737 
000001 
000137 

112761 
106237 
103372 
005237 
023737 
001404 
012737 
000402 
005037 
104401 
012705 
011010 
011010 
011010 
011010 
077505 
106237 
103366 
012737 
000137 



014002 



014612 
016774 

014714 



000020 
017062 



041713 
014002 



041724 
014226 

014333 
014020 

016726 

014642 
000001 

025524 

000020 
014714 

016764 
016764 

000001 

016764 
014220 
002000 



014642 

000001 014642 
025524 



67$: 
68$: 
69$: 
TS20A: 



5$: 



1$: 



014002 TS208: 

016770 
014714 



3$ 
4$ 
1$ 
2$ 



FAIL 
CHECK 

D1 
D2 
D3 

M0V8 
MOV 

tst 

BNE 

TYPE 

CLP 

M0V8 

TYPOS 

.WORD 

TYPE 

MOV 

TYPDS 

TYPE 

MOV 

CLR 

CMP 

BNE 

CLR 

MOV 

WAIT 

JMP 

M0V8 

ASRB 

BCC 

INC 

CMP 

BEQ 

MOV 

BR 

CLR 

TYPE 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

ASRB 

BCC 

MOV 

JMP 
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SEQ 0053 



#20. $TSTNM(R1) 

RO.PUT ;SET PROCESSOR UNDER TEST 

RO ;IS THIS THE MASTER? 

5$ .-BRANCH IF NO 

.TM77 .•"•TEST" 
-(SP) 

$TSTNM(R1).(SP) ;GET THE TEST NO. 

2 ;TYPE 2 DIGITS. NO LEADING 0 

.TM100 .-'POWERFAIL CPU # 

$CPUID(RO),-(SP) ;;SAVE $CPUID(RO) FOR TYPEOUT 

;;G0 TYPE — DECIMAL ASCII WITH SIGN 

.$CRLF 

#SSU!TI!NCX.PFFT(RO> ;SEND SIGNAL ON UP, TIME. DON'T SAVE NN 



R3 

D1.CPUACT 
1$ 

SIGNAL 
#1. 



SYNC. 2 



TST20 



SET FOR RTI RETURN 
MAKE SURE ALL CPU'S DONE WITH 
PREVIOUS CYCLE 
CLEAR THE POWER -UP SIGNAL 
UNLOCK THE OTHER CPUS 
WAIT FOR THE POWER TO FAIL 



#20. 
SYNC. 2 
TS208 
L0G1 

L0G1.CPULS1 
3$ 

#1. SYNC. 2 

4$ 

L0G1 

,$NULL 

#2000. R5 

(RO),CRO> 

(RO).(RO) 

(RO).(RO) 

(RO).(RO) 

R5. 2§ 

SIGNAL 

1$ 

#1. SIGNAL 
TST20 



$TSTNM(R1);SET UP THE TEST NUMBER 
.-WAIT FOR SYNC. SIGNAL 



.•COUNT CPU'S GOING THRU 

.LAST ONE HERE? 

•YES - SKIP 

•ELSE LET NEXT ONE IN 

.-LAST ONE INITS COUNTFR 
.•FLUSH THE TYPE QUEUE 
.•INITIALIZE COUNTER 



.•SIGNAL RECEIVED? 

;N0, CONTINUE WITH CONTENSION 

.-OPEN LOCK FOR NEXT CPU 



026114 
026114 



***************************************************************** 

;'*TEST 21 CHECK POWERFAIL SEQUENCE DURING MASSBUS XFER 

***************************************************************** 

TST21: 

012777 000021 166046 MOV #21. SD I SPLAY ;SET TEST NUMBER 

;;*•*•**•*******•• TS21A-F0RK ************************** 



MAINDEC-1 1-CEKSOC 
CEKBGC.P1 1 13-MAR-80 



PDP-11/70 
16:04 



SYSTEM POWER 
T21 



C 5 

FAIL MACY11 30A(1052) 
CHECK POWERFAIl SEQUENCE 



13-MAR-80 16:04 PAGE 42 
DURING MASSBUS XFER 



SFO 0054 



<T27 

2128 

2129 

2130 

2131 

2132 

2133 

21 34 

2135 

2136 

2137 

2138 

2139 

2140 

2141 

2142 

2143 

2144 

2145 

2146 

2147 

2148 

2149 

2150 

2151 

2152 

2153 

2154 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

2162 

2163 

2164 

2165 

2166 

2167 

2168 

2169 

2170 

2171 

2172 

2173 

2174 

2175 

2176 

2177 

2178 

2179 

2180 

2181 

2182 



026122 
026126 
026134 
026140 
026142 

026150 
026152 
026156 
026160 
026162 
026166 
026170 
026176 
026202 
026210 
026214 
026220 
026224 
026230 
026234 
026236 
026244 
026250 
026256 

026262 
026264 
026266 
026270 
026276 
026302 
026310 
026312 
026314 
026316 
026322 
026324 
026330 
026332 
026334 
026334 
026340 
026342 
026344 
026346 
026350 
026356 
026360 

026364 
026366 
026372 
026376 
026400 



016006 
052777 
106277 
103375 
027737 

001021 
013702 
005302 
006302 
027702 
001005 
012777 
000137 
062777 
005077 
005277 
005037 
005037 
020077 
001005 
012777 
000137 
012777 
000137 

016732 
016734 
017010 
112761 
010037 
023737 
001374 
005700 
001007 
104401 
005046 
116116 
104403 
000002 

013702 
006302 
005005 
020205 
001407 
022765 
001020 
062705 

000767 
104401 
016046 
104405 
104401 



014200 

100000 170674 
000126 

000114 016774 



016774 



000076 

000001 
027076 
000002 
000046 
000042 
014712 
014714 
000030 

000001 
026270 
000001 
026656 



70$: 



000021 
017062 
016732 



000070 
000054 64$: 
65$: 

000022 
000010 66$: 



67$: 
68$: 
69$: 
014002 TS21A: 

016774 4$: 



041713 
014002 

016774 

001400 014632 
000002 



044147 
014226 

0H333 



5$: 



1$: 



MOV $$STP(RO). 

BIS #8IT15. 3ACR 

ASR8 969$ 

BCC 70$ 

CMP i67$ # CPUACT 

BNE 65$ 

MOV CPUACT. R2 

DEC R2 

ASL R2 

CMP 368$. R2 

BNE 64$ 

MOV #1 . 369$ 

JMP TST22 

ADD #2, 368$ 

CLR 367$ 

INC 367$ 

CLR SYNC. 1 

CLR SYNC. 2 

CMP R0,368$ 

BNE 66$ 

MOV #1,369$ 

JMP TS21A 

MOV #1,369$ 

JMP TS21B 



SP;SET UP THE STACK 
.•INITIALIZE THE IIST 
.-ENTER CONTROL FORK 

.-HAVE WE REACHED THE END OF THE 
.•ROUTING CYCLE? 
.•BRANCH IF NO 



(CPUACT-1)*2 

ARE WE AT THE END OF THE TEST? 

BRANCH IF NO 

EXIT 

; INCREMENT 68$ BY 2 
CLEAR THE CHECKPOINT COUNTER 
INCREMENT CHECKPOINT 
CLEAR ALL THE LOCKS 
CLEAR THE LOCK 

ROUTE THIS PROCESSOR THROUGH TS21A? 
BRANCH IF NO 
CLEAR LOCK 

JUMP TO BRANCH TS21A 
CLEAR LOCK 
JUMP TO TS218 



•***»*******»*»***»*****»»*******»»*»»»»»»»»»»»*•»»***** 



2$: 



E1 
E2 
E3 

MOVS 
MOV 
CMP 
BNE 

TST 

BNE 

TYPE 

CLR 

MOVB 

TYPOS 

.WORD 

MOV 
ASL 
CLR 
CMP 
BEO 
CMP 
BNE 
ADD 

BR 

TYPE 

MOV 

TYPDS 

TYPE 



$TSTNM(R1) 

;SET PROCESSOR UNDER TEST 
CPUACT ;LET THE OTHER CPUS CATCH UP 



#21, 
RO.PUT 
El. 
4$ 
RO 
5$ 

,TM77 
-(SP) 

$TSTNM(R1).(SP) ;GET THE TEST NO 



IS THIS THE MASTER? 
BRANCH IF NO 
"TEST" 



2 ."TYPE 2 DIGITS. NO LEADING 0 

CPUACT, R2 .-CHECK FOR MASSBUS DEVICES ON OTHER CPUS 

R2 

R5 

R2, R5 
2$ 

#1400. MBDSW(R5) 
3$ 

#2. R5 
1$ 

.NODEV .-THERE ARE NO DEVICES TO TEST THIS CPU 

$CPUID(R0).-(SP) ;;SAVE $CPUID(RO) FOR TYPE OUT 

;;G0 TYPE — DECIMAL ASCII WITH SIGN 

,$CRLF 
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SEO 0055 



2183 

2184 

2185 

2186 

2187 

2188 

2189 

2190 

2191 

2192 

2193 

2194 

2195 

2196 

2197 

2198 

2199 

2200 

2201 

2202 

2203 

2204 

2205 

2206 

2207 

2208 

2209 

2210 

2211 

2212 

2213 

2214 

2215 

2216 

2217 

2218 

2219 

2220 

2221 

2222 

2221 

222^ 

?225 

c226 

2227 

2228 

2229 

2230 

2231 

2232 

2233 

2234 

2235 

2236 

2237 

2238 



026404 
026410 
026416 
026420 
026422 
026424 
026430 
026432 
026436 
026442 
026444 
026450 
026456 
026464 
026470 
026472 
026500 
026502 
026504 
026512 
026516 
026522 
026530 
026534 
026540 
026544 
026550 
026554 
026560 
026562 
026566 
026574 

026600 
026602 
026606 
026612 
026614 
026616 
026620 
026624 
026626 
026630 
026634 
026636 
026644 
026652 
026656 
026664 
026672 
026674 
026700 
026702 
026710 
026714 
026720 



10440'' 
012737 
000636 
020005 
001003 
062705 
000745 
104401 
016046 
104405 
104401 
012760 
012737 
005037 
005003 
022760 
001006 
000001 
012737 
000137 
016004 
012737 
004737 
005060 
012702 
016004 
062460 
005560 
077205 
016004 
012737 
004737 

005005 
012702 
016004 
062405 
005505 
077203 
020560 
001401 
104023 
106237 
103352 
012737 
012737 
000137 
112761 
022760 
001012 
106237 
103375 
012737 
104401 
000137 



042021 
000001 



000002 

041724 
014226 

014333 
014020 
000001 
014642 



000001 
026114 
017042 
000070 
033540 
014650 
004000 
017042 
014650 
014650 

017042 
000050 
033540 



004000 
017042 



014650 



014642 



014714 



3$: 



P21 



014612 
014712 



001400 014632 



014714 



176700 



1 76700 



1$: 



2$: 



4$: 



5$: 



6$: 



000001 014642 

000001 014714 
026114 

000021 014002 TS218: 

001400 014632 



0147K 

000001 014714 

014220 

026114 



10$: 



1$: 



TYPE .TM102 

MOV #1, SYNC. 2 

BR TST21 

CMP RO. R5 

BNE P21 

ADD »2. R5 

BR IS 

TYPE ,TM100 

MCV $CPUID(RO>.-(SP) 

TYPDS 

TYPE ,$CRLF 

MOV #SSU!TI .NCX.PFFT 

MOV #1, SYNC. 1 

CLR SIGNAL 

CLR R3 

CMP #1400,MBDSW(R0) 

BNE 1$ 

WAIT 

MOV #1. SYNC. 2 

JMP TST21 

MOV BFADR(RO) ,R4 

MOV #70.a#RPCS1 

JSR PC.MBUSR 

CLR CKSUM(RO) 

MOV #4000, R2 

MOV Bf ADR(RO) ,R4 

ADD (R4)*.CKSUM(R0) 

ADC CKSUM(RO) 

SOB R2.2$ 

MOV BFADR(RO) ,R4 

MOV #50,a*RPCSl 

JSR PC ,MBUSR 

CLR R5 

MOV #4000, R2 

MOV BFADR(RO) ,R4 

ADD (R4)*,R5 

ADC R5 

S08 R2.5$ 

CMP R5,CKSUM(R0> 

BEO 6$ 

ERROR* 23 

ASR8 SIGNAL 

BCC 4$ 

MOV #1. SIGNAL 

MOV #1. SYNC. 2 

JMP TST21 

M0V8 #21 , 

CMP #1400, 

BNE 1$ 

ASRB SYNC. 2 

BCC 10$ 

MOV #1, SYNC. 2 

TYPE ,$NULL 

JMP TST21 



$TSTNM(R1 
MBDSW(RO) 



'PROCEEDING TO NEXT CPU" 
BRANCH TO START OF TEST 

BRANCH IF THERE IS A DEVICE ON ANOTHER CPU 
THE DEVICE IS ON THIS CPU - 

'POWER FAIL CPU #" 

;;SAVE $CPUID(R0> FOR TYPEOUT 
;G0 TYPE— DECIMAL ASCII WITH SIGN 

(RO) .-SEND SIGNAL ON UP TIME. DON'T SAVE NN 
UNLOCK THE OTHER CPU'S 
CLEAR THE POWER-UP SIGNAL 
COME UP VIA RTI 

DOES THIS CPU HAVE A MASS8US DEVICE'' 

BRANCH IF YES 

WAIT FOR POWER TO FAIL 

UNLOCK CPUS IF ANY. ARE LOCKED 

GO TO CONTROL FORK 

PUT ADDRESS OF BUFFER IN R4 

DO A READ 

READ A RECORD 

CLEAR CHECKSUM LOCATION 

INITIALISE A COUNTER 

GET BUFFER POINTER 

PERFORM ' 

CHECKSUM 

LOOP 

LOAD BUFFER ADDRESS 

DO A WRITE CHECK 

READ FROM MASS BUS DEVICE 

CLEAR R5 

INITIALIZE COUNTER 
GET POINTER TO BUFFER 
PERFORM 
CHECKSUM 

EVERYTHING OK? 
BRANCH IF YES 
CHECKSUM IS WRONG 

NO CONTINUE XFERS 
OPEN LOCK FOR OTHER CPU'S 
UNlKK CPUS IF ANY ARE LOCKED 
GO TO CONTROL FORK 
) ;SET THE TEST NUMBER 

.DOES THIS CPU HAVE A MASSBUS DEVICE? 
BRANCH IF YES 
ELSE SET OUT THIS ROUND 



;OPEN LOCK FOR OTHERS 
;FLUSH THE TYPE QUEUE 
;JUMP INTO THE CONTROL LOOP 
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CC J* 


02 A 720 

\JC O' £v 


016004 

V 1 Uwv^ 


01 7042 

V 1 ' v~c 




026724 


V • C ' J I 


000070 

WW ' v 


CC** 1 


026732 


004737 


033540 


C C**C 


026736 


005060 

W V VW 


014650 

V 1 ~ V J V 


2243 


026742 

VCvl ' *f C 


012703 

V * C ' Vj 


004000 

W"* VW 


2244 


026746 

VCvr "*V> 


016004 


01 7042 

V 1 ' v~ c 


2245 


026752 

VCv' JC 


062460 
wc~ w 


014650 


2246 

CC~U 


026756 

VLv ' 


005560 


014650 


2247 

C C** f 


026762 

VCU ' WC 


077305 




2248 

CC"0 


026764 


106237 

1 WC —J ' 


014712 


2249 

CC17 


026770 


103375 




2250 

CC ./v 


026772 

VCv' » C 


012737 

V ' C ' -/ ' 


000001 

V WW 1 


2251 


027000 

VC ' VW 


104401 


014220 


2252 

C C •'C 


027004 

VC ' W~* 


016004 

V ' WW^ 


017042 


2253 

C C / 


027010 


0127 V 


000050 

W V V V 


2254 


027016 

VC ' W 1 u 


004737 


033540 


2255 


027022 


005005 

W J V V -<» 




2256 


027024 

VC ' vt~ 


012703 


004000 


2257 


027030 


016004 


01 7042 


2258 


027034 


062405 




2259 


027036 


005505 




2260 


027040 


077303 




2261 


027042 


020560 


014650 


2262 


027046 


001401 




2263 


027050 


104023 




2264 


027052 


106237 


014642 


2265 


027056 


103352 




2266 


027060 


012737 


000001 

www ■ 


2267 


027066 


104401 


014220 


2268 


027072 


000137 


026114 


2269 








2270 








2271 








2272 








2271 








227U 








2275 








227 1 








2277 








2278 








2279 








2280 


027076 






2281 


027076 


012777 


000022 


2282 

CC WC 








2283 


027104 


v 1 12761 


000022 


2284 

c c 


027112 


106237 


016776 


2285 


027116 


103375 




2286 


027120 


005237 


014542 


2287 


027124 


012737 


000001 


2288 


027132 


023737 


016774 


2289 


027140 


001374 




2290 


027142 


005037 


014540 


2291 


027146 


005037 


177776 


2292 


027152 


020027 


000000 


2293 


027156 


001001 




2294 


027160 


000474 





MOV BFADR(RO) ,R4 

176700 MOV #70.a#RPCS1 

JSR PC.MBUSR 

CLR CKSUM(RO) 

MOV #4000. R3 

MOV BFADR(RO) ,R4 

2$: ADD (R4)*.CKSUM(R0) 

ADC CKSUM(RO) 

S08 R3.2S 

7$: ASR8 SYNC. 1 

BCC 7$ 

014712 MOV #1,SYNC1 

TYPE .SNULL 

4$: MOV BFADR(RO) ,R4 

17670C MOV #50.3#RPCS1 

JSR PC.MBUSR 

CLR R5 

MOV #4000. R3 

MOV BFADR(RO) ,R4 

5$: ADD (R4H.R5 

ADC R5 

SOB R3.5f 

CMP R5.CKSUM(R0> 

BEQ 6$ 

ERROR 23 

6$: ASR8 SIGNAL 

BCC 4$ 

014642 MOV #1. SIGNAL 

TYPE .SNULL 

JMP TST21 



;PUT ADDRESS OF BUFFER IN R4 

;D0 A READ 

.-READ A RECORD 

;ClEAR CHECKSUM LOCATION 
.•INITIALIZE A COUNTER 

;GET BUFFER POINTER 

.PERFORM... 

; CHECKSUM. 

.-LOOP 
.-HOLD UP 

.-OPEN LOCK FOR OTHERS 

.-FLUSH THE 0UEUE 

.-LOAD BUFFER ADDRESS 

;D0 A WRITE CHECK 

.-READ FROM MASS BUS DEVICE 

• CLEAR R5 

.•INITIALIZE COUNTER 
;GET POINTER TO BUFFER 
.•PERFORM... 
.•CHECKSUM 

.•EVERYTHING OK? 

; BRANCH IF YES 

; CHECKSUM IS WRONG 

;N0 CONTINUE XFERS 
.-OPEN LOCK FOR OTHERS 

; JUMP INTO CONTROL LOOP 



.-•TEST 22 
TST22: 



2$: 



1$: 



MOV 

M0V8 

ASR8 

BCC 

INC 

MOV 

CMP 

BNE 

CLR 

CLR 

CMP 

BNE 

BR 



CHECK AC POWERFAIL ON MEM BOXES. PORTS DISABLED 



#22. 3D I SPLAY ;SET TEST NUMBER 



#22. 
SYNC. 3 
2$ 

ENTR22 
#1. 

CPUACT. 
1$ 

EXIT 
PSW 

R0. 

TS22B 

TS22A 



$TSTNM(R1 ) 



SYNC. 3 
ENTR22 



#0 



;SET THE TEST NUMBER 
.•CONTROL THE ENTRY 

; INCREMENT ENTER FLAG 
."ALLOW THE OTHERS IN 
.ARE ALL CPUS HERE? 
;N0T YET 

.•CLEAR THE EXIT FLAG 
.SET KERNAL MODE 
;IS THIS THE MASTERS 
.•BRANCH IF NO 
.-THIS IS THE MASTER 



MAiNDEC-11-CEKBG-C 
CEKBGC.P11 13-MAR-80 



POP- 11/70 
16:04 



SYSTEM POWER 
T22 



2295 

2296 

2297 

2298 

2299 

2300 

2301 

2302 

2303 

2304 

2305 

2306 

2307 

2308 

2309 

2310 

2311 

2312 

2313 

2314 

2315 

2316 

2317 

2318 

2319 

2320 

2321 

2322 

2323 

2324 

2325 

2326 

2327 

2328 

2329 

2330 

2331 

2332 

2333 

2334 

2335 

2336 

2337 

2338 

2339 

2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 

2348 

2349 

2350 



027162 
027170 
027176 
027202 
027206 
027214 
027220 
027224 
027226 
027232 
027236 
027242 
027244 
027250 
027256 
027264 
027272 
027300 
027304 
027306 
027312 
027314 
027320 
027324 

027326 
027332 
027334 
027336 
027340 
027344 
027350 



027352 
027352 
027354 
027356 
027362 
027364 
027370 
027372 
027374 
027374 
027402 
027410 
027414 
027420 
027^22 
027426 
027432 
027440 
027446 
027452 



052777 
012777 
016006 
005060 
012760 
012703 
005737 
001404 
005037 
000137 
005737 
001421 
004737 
063737 
063737 
063737 
052737 
005037 
000726 
005737 
001723 
005037 
005037 
000716 

005737 
001002 
104001 
000711 
005060 
104401 
000704 



005700 
001007 
104401 
005046 
116116 
104403 
000002 

012737 
012737 
004737 
005737 
001402 
000137 
0 1 2702 
052777 
0\2777 
016006 
005060 



014522 



017012 
042052 



1$: 



100000 167640 T S228: 
000022 164772 
014200 
014612 

040630 014702 

027326 

014540 

177572 
030120 
014534 

032604 
014550 
014550 
014550 
000001 
014534 

014536 

177572 
014536 



17234C 
172342 
1 72344 
177572 



21: 



100$: 



101$: 



TS22A: 



5$: 



041713 
014002 



000000 014522 
000000 014526 
032342 
014540 

030120 

000016 1$: 
100000 167370 2$: 
000022 164522 
014200 
014612 



TST 

BNE 

TYPE 

CLR 

M0V8 

TYPOS 

.WORD 

MOV 
MOV 
JSR 
TST 
BE Q 
JMP 
MOV 
BIS 
MOV 
MOV 
CLR 



FAIL 


F 5 

MACY11 3OAH052) 13-MAR- 


•80 16:04 PAGE 45 


CHECK 


AC POWERFAIL ON MEM BOXES. 


PORTS DISABLED 


BIS 


#8IT15. SACR 


INITIALIZE THE 1 1ST 


MOV 


#22, 3D I SPLAY 


SET TEST NUMBER 


MOV 


$$STP(RO), SP 


INITIALIZE THE STACK 


CLR 


PFFT(RO) 


SPECIFY THE POWER FAIL 


MOV 


#CPUER. ERRTAB(RO) 


SET FOR UNEXPECTED TRAPS TO 4 


MOV 


#100$, R3 


SET FOR POWER FAIL RETURN 


TST 


EXIT 


FINISHED WITH THIS TEST? 


BEQ 


1$ 


BRANCH IF NO 


CLR 


MMRO 


MAKE SURE MM IS TURNED OFF 


JMP 


TST23 


GO TO NEXT TEST 


TST 


RE LOUP 


TIME TO RELOCATE? 


BEQ 


2$ 


BRANCH IF NO 


JSR 


PC, SETMM 


GET READY FOR RELOCATION 


ADD 


HIBOX, KIPARO 




ADD 


HIBOX, KIPAR1 




ADD 


HI80X, KIPAR2 




BIS 


#1 , MMRO 


•SLAVE IS NOW IN HIGH CORE 


CLR 


RELOUP 


CLEAR RELOCATION FLAG 


BR 


TS22B 


•CONTINUE TESTING 


TST 


RELODN 


; TIME TO RELOCATE? 


BEQ 


TS22B 


.■BRANCH IF NO 




MMRO 


■RFTllRfJ TD 1 0U CHRP 


CLR 


RELODN 


; CLEAR THE FLAG 


BR 


TS22B 


.•CONTINUE 


TST 


PWRFL 


.•SHOULD WE BE HERE? 


BNE 


101$ 


; BRANCH IF YES 


ERROR 


1 


.•UNEXPECTED CPU POWER FAIL 


BR 


TS22B 


.•CONTINUE TESTING 


CLR 


NOPRMP(RO) 


.WANT TO IDENTIFY THE CPU 


TYPE 


.TM103 


.-EXPECTED CPU POWER FAIL 


BR 


TS22B 


.•CONTINUE TESTING 



SEQ 0057 



RO 
5$ 

,TM77 
-(SP) 

$TSTNM(R1),(SP) ;GET THE TEST NO 



;IS THIS THE MASTER? 
; BRANCH IF NO 
."TEST" 



PWRFL 
BOOT 
MEMS I Z 



#0. 
#0, 
PC, 
EXIT 
1$ 

TST23 

#16, R2 
#BIT15, 3ACR 
#22, 

$$STP(RO). 
PFFT(RO) 



3D I SPLAY 



SP 



TYPE 2 DIGITS, NO LEADING 0 

SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 

SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND I 

FIND ALL THE MEM BOXES 

WAS ONLY ONE MEM BOX FOUND? 

BRANCH IF NO 

WE CAN'T DO THIS TEST 

POINT TO BOX #7 

INITIALIZE THE 1 1ST 

SET THE TEST NUMBER 

INIALIZE THE STACK 

SPECIFY THE POWER FAIL 



J 



MAINDEC-I 1-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 



KBGC. 


P11 ' 1 3-MAR-80 


16:04 




T22 


CHECK 


2551 


027456 


012760 


040630 


014702 




MOV 


2352 


027464 


005702 








TST 


2353 


027466 


002012 








BGE 


235*. 


027470 


012737 


000112 


000110 




MOV 


2355 


027476 


005037 


000000 






CLP. 


2356 


027502 


012737 


000001 


014540 




MOV 


2357 


027510 


000137 


030120 






JMP 


2358 


027514 


005762 


014502 




3$: 


TST 


2359 


027520 


003037 








BGT 


2360 


027522 


001403 








BE a 


2361 


027524 


162702 


000002 






sue 


2362 


027530 


000740 








BR 


2363 


027532 


022737 


000001 


014646 


4$: 


CMP 


2364 


027540 


002027 








BGE 


2365 


027542 


005737 


014526 






TST 


2366 


027546 


001141 








BNE 


2367 


027550 


/ 7 77 

004737 


033042 






JSR 


2368 














2369 


027554 


012737 


000001 


014532 




MOV 


2370 


027562 


012737 


000001 


014534 




MOV 


2371 


027570 


/\ / 7 777 

063737 


014550 


1 72340 




ADD 


2372 


027576 


A/ 7 77 7 

063737 


014550 


172342 




ADD 


2373 


027604 


063737 


014550 


1 72344 




ADD 


2374 


r\-\-9 1 4 -\ 

027612 


rtC 1777 

052737 


000001 


177572 




BIS 


2375 


027620 








10$: 




2376 


027620 


AACA77 

005037 


014530 




MS: 


CLR 


2377 


027624 


v-yyw 777 

004737 


032700 






JSR 


2378 


027630 


004737 


032566 






JSR 


2379 


027634 


104401 


042534 






TYPE 


2380 


027640 


Art/ *i 

006202 








ASR 


2381 


027642 


010246 








MOV 


2382 


027644 


104405 








TYPDS 


2383 


027646 


006302 








ASL 


2384 


027650 


104401 


043226 






TYPE 


2385 


027654 


012703 


030016 






MOV 


2386 


027660 


AAr777 

005737 


014526 






TST 


2387 


027664 


001414 








BE a 


2388 


027666 


1777 

012737 


020000 


000000 


13$: 


MOV 


2389 


/-v AT/ 7 / 

027674 


r\r\r 177 

005237 


000110 






INC 


2390 


027700 


4 AT 777 

105777 


164304 






TSTB 


2391 


027704 


100370 








BPL 


2392 


027706 


4 ^777 

012777 


033226 


167120 




MOV 


2393 


027714 


rtrtrt / 4 7 

000413 








BR 


2394 


027716 








12$: 




2395 


l 771 v 

027716 


« Af 777 

105777 


164266 






TSTB 


2396 


/\ ->77 1 ~\ 

027722 


4 AA77C 

100375 








BPL 


2397 


f\ "*> 771 / 

027724 


r\r\r 777 

005737 


014522 




17$: 


TST 


2398 


/M 7 7TA 

027730 


001402 








BEQ 


2399 


/\ 77 7 "> 

027732 


104024 








ERROR 


2400 




/VW./. 1 
UUU4H I 








BR 


2401 


027736 


104401 


047252 




18$: 


TYPE 


2402 


027742 


000436 








BR 


2403 


027744 


017704 


164210 




14$: 


MOV 


2404 


027750 


042704 


1 77760 






8IC 


2405 


027754 


012777 


000000 


167046 




MOV 


2406 


027762 


010477 


167044 






MOV 



G 5 
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AC POWERFAIL ON MEM BOXES. PORTS DISABLED 



46 



SEO 0058 



#CPUER. ERRTAB(RO) 
R2 



3$ 

#112. 
3*0 
#\ 
TST23 
START (R2) 
10$ 
4$ 
#2. 
2$ 
#1. 
11$ 
BOOT 
103$ 
PC. 

#1, 
#1. 



amo 

EXIT 



R2 

BOXNUM 



RELOHI 

HICORE 
RELOUP 
HIBOX. KIPARO 
HI80X, K I PARI 
HIBOX. KIPAR2 
#1 , MMRO 



PATCHK 

PC. 

PC. 

.TM106 

R2 

R2. 



PATTRN 
BUFCLR 



-(SP) 



R2 

.TM108 
#100$. R3 
BOOT 
12$ 

#20000, a#o 

a#no 

aSTKS 
13$ 

#ENTR. aiSTvEC 
14$ 

aSTKS 
12$ 
PURFL 
18$ 

24 

102$ 

.OK 

102$ 

aSUR, R4 
#177760. R4 
#PGTE, iACR 
R4 . 3ADR 



SET FOR UNEXPECTED TRAPS TO 4 

DID WE TEST ALL THE BOXES 

BRANCH IF NO 

RESTORE LOC 110 

RESTORE LOC 0 

SIGNAL THE SLAVES TO EXIT 

GO TO THE NEXT TEST 

WHAT DO WE KNOW ABOUT THIS BOX? 

BRANCH IF NOT THE BASE BOX 

BRANCH IF ITS THE BASE BOX 

THERE WAS NO BOX-POINT TO THE NEXT LOWER BOX 
CONTINUE 

WAS THERE ONLY ONE MEM BOX? 

BRANCH IF YES 

IS THIS THE DC TEST? 

BRANCH IF YES 

TO TEST THE BASE BOX. 

RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 
TURN MM ON ON POWER-UP 
SIGNAL SLAVES TO RELOCATE 
GET READY TO GO TO HIGH CORE 



;WE ARE NOW IN HIGH CORE 

.-SET TO WRITE PATTERN 

.-WRITE THE PATTERN 

."CLEAR THE KEYBOARD BUFFER 

;TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 



SPECIFY THE CONDITIONS 
SET UP THE POWER FAIL RETURN 
IS THIS THE DC TEST? 
BRANCH I F NO 

MAKE BOOTING SLAVE SP=20000 
HANG THE SLAVES BOOT 
IS CHARACTER IN BUFFER? 
LOOP 

SET UP TO INTERRUPT SLAVES 
CONTINUE 

IS CHARACTER IN THE BUFFER? 
LOOP 

SHOULD THE MASTER HAVE POWER FAKED? 

BRANCH IF NO 

FAILURE TO POWER FAIL 

CONTINUE 



GET THE SWITCH VALUES 
SAVE ONLY CPU BITS 
ACCESS PGTE REG 
SET INTERRUPT BITS 



H 5 
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CEKBGC.P11 13-MAR-80 16:04 T22 CHECK AC POWERFAIL ON MEM BOXES. PORIS DISABLED 



SEQ 0059 



2407 


027766 


032737 


000001 


2408 


027774 


001404 




2409 


027776 


012777 


000001 


2410 


030004 


000422 




2411 


030006 


012777 


000003 


2412 


030014 


000416 




2413 








2414 


030016 


005737 


014522 


2415 


030022 


001002 




2416 


030024 


104001 




2417 


030026 


000404 




2418 


030030 


005060 


017012 


2419 


030034 


104401 


042052 


2420 


030040 


012737 


000001 


2421 


030046 


004737 


032700 


2422 


030052 


032737 


000001 


2423 


030060 


001411 




2424 


030062 


004737 


033166 


2425 


030066 


012737 


000001 


2426 


030074 


005037 


1 77572 


2427 


030100 


005037 


014532 


2428 


030104 


005005 




2429 


030106 


077501 




2430 


030110 


162702 


000002 


2431 


030114 


000137 


027432 


2432 








2433 








2434 








2435 








2436 








2437 








2438 








2439 








2440 








2441 








2442 


030120 






2443 


030120 


0T2777 


000023 


2444 








2445 


030126 


112761 


000023 


2446 


030134 


106237 


016776 


2447 


030140 


103375 




2448 


030142 


005237 


014544 


2449 


030146 


012737 


000001 


2450 


030154 


023737 


016774 


2451 


030162 


001374 




2452 


030164 


005037 


014540 


2453 


030170 


005037 


1 77776 


2454 


030174 


020027 


000000 


2455 


030200 


001001 




2456 


030202 


000474 




2457 








2458 


030204 


052777 


100000 


2459 


030212 


012777 


000023 


2460 


030220 


016006 


014200 


2461 


030224 


005060 


014612 


2462 


030230 


012760 


040630 



016^74 
167026 
167016 1 5$: 

100$: 
101$ 

0K530 102$ 
177572 103$ 



014536 



104$: 



BIT 

BEO 

MOV 

BR 

MOV 

BR 

TST 

BNE 

ERROR 

BR 

CLR 

TYPE 

MOV 

JSR 

BIT 

BEO 

JSR 

MOV 

CLR 

CLR 

CLR 

SOB 

sue 

JMP 



#8IT0, 

15$ 

#1. 

103$ 

*3 t 

103$ 



CPUACT 

3ADR 

SADR 



PWRFL 

101$ 

1 

102$ 

NOPRMP(RO) 
.TM103 
#1. 



PC, 

#1. 

104$ 

PC. 

#1. 

MMRO 

HI CORE 

R5 

R5. 

*2, 

2$ 



PATCH* 
PATTRN 
MMRO 

RELOLO 
RELODN 



R2 



EVEN OR ODD' 
BRANCH IF EVEN 

INTERRUPTING AN EVEN NUMBER OF SLAVES 
INTERRUPTING AN ODD # OF SLAVES 



DID WE EXPECT POWER FAIL? 
BRANCH IF YES 

MASTER CRROREOUSLY POWER FAILED 
CONTINUE 

ALLOW CPU IDENTIFICATION 

CPU POWER FAIL MSG 

SET UP FOR PATTERN CHECK 

CHECK THE PATTERN 

ARE WE IN HIGH CORE? 

BRANCH IF NO 

ELSE RELOCATE 

SIGNAL THE SLAVES 

WE ARE NOW BACK DOWN IN LOW CORE 

MAKE SURE MM ON POWER-UP DISABLED 

MAKE TS22A DELAY 

POINT TO NEXT BOX 
CONTINUE 



•ft************************************************************* 



•TEST 23 



CHECK AC POWERFAIL ON MEM BOXES. PORTS ENABLED 



164042 
014002 



016776 
014544 



TST23: 



2$: 



1$: 



166616 
163750 



014702 



TS23B: 



MOV 

M0VB 

ASRS 

BCC 

INC 

MOV 

CMP 

BNE 

CLR 

CLR 

CMP 

BNE 

BR 

BIS 
MOV 
MOV 
CLR 
MOV 



#23.aDISPLAY ;SET TEST NUMBER 



#23. 
SYNC. 3 
2$ 

ENTR23 
#1. 



$TSTW(R1) 



SYNC. 3 
CPUACT, ENTR23 
1$ 

EXIT 
PSW 

RO. #0 

TS23B 

TS23A 

#BIT15, iACR 
#23, 3D I SPLAY 
$$STP(RO), SP 
PFFT(RO) 

#CPUER. ERRTAB(RO) 



SET THE TEST NUMBER 
CONTROL THE ENTRY 

INCREMENT ENTER FLAG 
ALLOW THE OTHERS IN 
ARE ALL CPUS HERE? 
NOT YET 

CLEAR THE EXIT FLAG 

SET KERNAL MODE 

IS THIS THE MASTER? 

BRANCH IF NO 

THIS IS THE MASTER 

INITIALIZE THE 1 1ST 
SET TEST NUMBER 
INITIALIZE THE STACK 
SPECIFY THE POWER FAIL 
SET FOR UNEXPECTED TRAPS 



TO 4 



HAINDEC-1 1-CE>CBG-C PDP-11/70 SYSTEM POWER FAIL 



CEKBGC.P11 13-MAR-80 16:04 T23 CHECK 

2463 030236 012703 030350 MOV 

2464 030242 005737 014540 TST 

2465 030246 001404 BEO 

2466 030250 005037 177572 CLR 

2467 030254 000137 031142 JMP 

2468 030260 005737 014534 1$: TST 

2469 030264 001421 BEO 

2470 030266 004737 032604 JSP. 

2471 030272 063737 014550 172340 ADD 

2472 030300 063737 014550 172342 ADD 

2473 030306 063737 014550 172344 ADD 

2474 030314 052737 000001 U7S72 BIS 

2475 030322 005037 014534 CLP 

2476 U30326 000726 BR 

2477 030330 005737 014536 2$: TST 

2478 030334 001723 BEO 

2479 030336 005037 177572 CLR 

2480 030342 005037 014536 CLR 

2481 030346 000716 BR 
2482 

2483 030350 005737 014522 100$: TST 

2484 030354 001002 BNE 

2485 030356 104001 ERROR 

2486 030360 000711 BR 

2487 030362 005060 017012 101$: CLR 

2488 030366 104401 042052 TYPE 

2489 030372 000704 BR 
2490 

2491 
2492 

2493 030374 TS23A: 

2494 030374 005700 TST 

2495 030376 001007 BNE 

2496 030400 104401 041713 TYPE 

2497 030404 005046 CLR 

2498 030406 116116 014002 MOVB 

2499 030412 104403 TYPOS 

2500 030414 000002 .WORD 

2501 030416 5$: 

2502 030416 012737 000001 014522 MOV 

2503 030424 012737 000000 014526 MOV 

2504 030432 004737 032342 JSR 

2505 030436 005737 014540 TST 

2506 030442 001402 BEO 

2507 030444 000137 031142 JMP 

2508 030450 012702 000016 1$: MOV 

2509 030454 052777 100000 166346 2$: BIS 

2510 030462 012777 000023 163500 MOV 

2511 030470 016006 014200 MOV 

2512 030474 005060 014612 CLR 

2513 030500 012760 040630 014702 MOV 

2514 030506 005702 TST 

2515 030510 002012 BGE 

2516 030512 012737 000112 000110 MOV 

2517 030520 005037 000000 CLR 

2518 030524 012737 000001 014540 MOV 



MACY11 30A(1052) 13-MAR-80 16:04 PAGE 48 
AC POWERFAIL ON MEM BOXES. PORTS ENABLED SEQ 0060 



#100$. R3 ;SET FOR POWER FAIL RE flfRN 

EXIT .-FINISHED WITH THIS TEST? 

1$ ; BRANCH IF NO 

MMRO .-MAKE SURE MM IS TURNED OF F 

TST24 ;G0 TO NEXT TEST 

RELOUP .-TIME TO RELOCATE? 

2$ .-BRANCH IF NO 

PC. SETMM .-GET READY FOR RELOCATION 

HI80X, KIPARO 

HI80X. K I PARI 

HI80X. KIPAR2 

#1. MMRO .-SLAVE IS NOW IN HIGH CORE 

RELOUP .-CLEAR RELOCATION FLAG 

TS23B .-CONTINUE TESTING 

RELODN ; TIME TO RELOCATE? 

TS23B ; BRANCH IF NO 

MMRO .-RETURN TO LOW CORE 

RELODN .-CLEAR THE FLAG 

TS238 .-CONTINUE 

PWRFL ; SHOULD WE BE HERE? 

101$ ; BRANCH IF YES 

1 .-UNEXPECTED CPU POWER FAIL 

TS23B .CONTINUE TESTING 

NOPRMP(RO) .-WANT TO IDENTIFY THE CPU 

.TM103 .-EXPECTED CPU POWER FAIL 

TS238 .-CONTINUE TESTING 



RO 
5$ 

.TM77 
-(SP) 

$TSTNM(R1>,(SP) ;GET THE TEST NO. 



;IS THIS THE MASTER' 
; BRANCH IF NO 
.-"TEST" 



#1. 

#0, 

PC, 

EXIT 

1$ 

TST24 
#16, 



PWRFL 
BOOT 
MEMS I Z 



R2 



#8IT15, 3ACR 
#23. 3D I SPLAY 
$$STP(RO), SP 
PFFT(RO) 

#CPUER, ERRTAB(RO) 
R2 



3$ 

#112, 

a#o 

#1, 



a#no 

EXIT 



: TYPE 2 DIGITS, NO LEADING 0 

SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 

SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND I 

FIND ALL THE MEM BOXES 

WAS ONLY ONE MEM BOX FOUND? 

BRANCH IF NO 

WE CAN'T DO THIS TEST 

POINT TO BOX #7 

INITIALIZE THE 1 1ST 

SET THE TEST NUMBER 

INIALIZE THE STACK 

SPECIFY THE POWER FAIL 

SET FOR UNEXPECTED TRAPS TO 4 

DID WE TEST ALL THE BOXES 

BRANCH IF NO 

RESTORE LOC 110 

RESTORE LOC 0 

SIGNAL THE SLAVES TO EXIT 
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2519 


030532 


000137 


031142 






JMP 


TST24 




GO TO THE NEXT TEST 


2520 


030536 


005762 


014502 




3$: 


TST 


START (R2) 


WHAT DO WE KNOW ABOUT THIS BOX? 


2521 


030542 


003037 








BGT 


10$ 




BRANCH IF NOT THE BASE BOX 


2522 


030544 


001403 








BEQ 


4$ 




BRANCH IF ITS THE BASE BOX 


2523 


030546 


162702 


000002 






SUB 


*2. 


R2 ; 


THERE WAS NO BOX-POINT TO THE NEXT LOWER BOX 


2524 


030552 


000740 








BR 


2$ 




CONTINUE 


2525 


030554 


022737 


000001 


014646 


4$: 


CMP 


*1« 


B0XNUM ! 


WAS THERE ONLY ONE MEM BOX 7 


2526 


030562 


002027 








8GE 


11$ 




BRANCH IF YES 


2527 


030564 


005737 


014526 






TST 


BOOT 




IS THIS THE DC TEST? 


2528 


030570 


001141 








BNE 


103$ 




BRANCH IF YES 


2529 


030572 


004737 


033042 






JSR 


PC. 


RELOHI \ 


TO TEST THE BASE BOX. 


2530 


















RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 


2531 


030576 


012737 


000001 


014532 




MOV 


#1. 
#1. 

HI80X, 


HIC0RE ! 


TURN MM ON ON POWER-UP 


2532 


030604 


012737 


000001 


0K534 




MOV 


RELOUP 


SIGNAL SLAVES TO RELOCATE 


2533 


030612 


063737 


014550 


4 777 / A 

172340 




ADD 


KIPAR0 


GET READY TO GO TO HIGH CORE 


7f 7 1 

2534 


/\ 7 Ay 7 /-v 

030620 


/\y *» 7 7 7 

063737 


a 4 / f f a 

014550 


4 777 1 7 

1 72342 




ADD 


HI80X . 


K I PARI 




— \C 7f 

2535 


030626 


063737 


/% 4 / f f y\ 

014550 


172344 




ADD 


HI80X. 


KIPAR2 




2536 


030634 


Af« 77 "7 

052737 


000001 


177572 




BIS 


#1. 


MMR0 ;WE ARE NOW IN HIGH CORE 


2537 


030642 








10$: 










7f t o 

2538 


A TAy / 7 

030642 


005037 


014530 




11$: 


CLR 


PATCHK 


4 


SET TO WRITE PATTERN 


TC 1C\ 

2539 


A 7 A^ / y 

030646 


AAy "77^ 

004737 


A7 77AA 

032700 






JSR 


PC. 


PATTRN .-WRITE THE PATTERN 


2540 


030652 


AA / T7"7 

004737 


a 7 7 f y y 

032566 






JSR 


PC. 


BUFCLR .CLEAR T HF KEYBOARD BUFFER 


2541 


A 7A/ f y 

030656 


104401 


S\ / -\ r 7 y 

042534 






TYPE 


.TM106 




;TtLL frit OPcRATOR TO POWtn FAIL THt PxrxJRY BOX 


if i 7 

2542 


A 7 Ay y 7 

030662 


AAy 7 A 7 

006202 








ASR 


R2 






2543 


A7Ayj y y 

030664 


010246 








MOV 


R2. 


-<SP) 




-vr y / 

2544 


y y 

030666 


4 Ay / AC 

104405 








TYPDS 






-»f / f 

2545 


7 a 

030670 


AAy 7A7 

006302 








ASL 


R2 






*\r y y; 

2546 


A7AV "7 7 

030672 


4 Ay / ai 

104401 


a/ 7 y aa 

042600 






TYPE 


.TM107 




• qpft i f v tmp rnwn t t tpm^ 

, Or^C CI* T 1 HC L LVm/ 1 1 I U*MO 


2547 


A 7 Ay: 7;y 

030676 


A 4 7 7 A 7 

012703 


A 7 4 A / A 

031040 






MOV 


#100$. 


R3 


;SET UP THE POWER FAIL RETURN 


y a 

2548 


A7A7A A 

030702 


AAf 777 

005737 


A1 y c Ay; 

014526 






7 f T 

TST 


BOOT 




;IS THIS THE DC TEST? 


2549 


030706 


AA4 y 4 y 

001414 








BE0 


12$ 




"BRANCH If NO 


2550 


atah a 

030710 


A 7 T777 

012737 


AT AAA A 

020000 


A AAAA A 

000000 


13$: 


MOV 


#20000. 


a*o 


•MAKE BOOTING SLAVE SP=20000 


2551 


030716 


AAC 7T"7 

005237 


AAA4 4 A 

000110 






INC 


an 10 




;HANG THE SLAVES BOOT 


7C C 7 

2552 


A7A1H 

030722 


4 AC "777 

105777 


4 y 7 7y 7. 

1 63262 






TST8 


a$TKS 




;IS CHARACTER IN BUFFER? 


2553 


A7 A77y 

030726 


4 AAV 7 A 

100370 








BPL 


13$ 




.LOOP 


7C C / 

2554 


A7ATTA 

030730 


012777 


A77T*y 

033226 


4 y z A7y 

166076 




MOV 


#ENTR, 


9ISTVEC 


;SET UP TO INTERRUPT SLAVES 


2555 


030736 


AAA/ 4 7 

000413 








BR 


14$ 




.CONTINUE 


2556 


030740 








4 7* 

12$: 










-»f r* 7 

2557 


/a 7A7> A 

030740 


4 Af 777 

105777 


4 y£ 77 / / 

163244 






TSTB 


a$TKS 




;IS CHARACTER IN THE BUFFER? 


iff a 

2558 


A 7A7 y / 

030744 


4 A A 7 7f 

1 00375 








BPL 


12$ 




.LOOP 


2559 


030746 


AAf 77 7 

005737 


Ai y C 7 7 

014522 




4 7* 

17$: 


TST 


PWRFL 




; SHOULD THE MASTER HAVE POWER FAILED? 


'If /A 

2560 


A7A7C 7 

030752 


AA4 / A7 

001402 








BE0 


18$ 




.BRANCH IF NO 


2561 


030754 


4 Ay A7/ 

104024 








ERROR 


24 




; FAILURE TO POWER FAIL 


7f ,y 7 

2562 


030756 


AAAy / 4 

000441 








BR 


102$ 




.•CONTINUE 


2563 


ATA7y a 

030760 


4 Ay / A1 

1 04401 


Ay 77 f 7 

047252 




18$: 


TYPE 


.OK 






2564 


A7A "1/ / 

030764 


AAAy 7 y 

000436 








BR 


102$ 






if / f 

2565 


A7A7.y y 

030766 


Ai 77A/ 

017704 


4 y 7 4 y y 

163166 




14$: 


MOV 


asuR. 


R4 


.GET THE SWITCH VALUES 


2566 


030772 


042704 


1 77760 






BIC 


#177760. R4 


.•SAVE ONLY CPU BITS 


<*f y 7 

2567 


A7A77 y 

030776 


/\ 4 ^777 

012777 


AAAA AA 

000000 


166024 




MOV 


#PGTE, 


SACR 


.•ACCESS PGTE REG 








ioou<ry 






nUV 


R4. 


8ADR 


.SET INTERRUPT BITS 


2569 


031010 


032737 


000001 


016774 




BIT 


#BJT0, 


CPUACT 


,-EVEN OR ODD? 


2570 


031016 


001404 








BEQ 


15$ 




.•BRANCH IF EVEN 


2571 


031020 


012777 


000001 


166004 




MOV 


#1. 


SADR 


; INTERRUPTING AN EVEN NUMBER OF SLAVES 


2572 


031026 


000422 








BR 


103$ 






2573 


031030 


012777 


000003 


165774 


15$: 


MOV 


#3. 


8ADR 


•INTERRUPTING AN ODD » OF SLAVES 


2574 


031036 


000416 








BR 


103$ 







K 5 
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SEQ 0062 



2575 

2576 

2577 

2578 

2579 

2580 

2581 

2582 

2583 

2584 

2585 

2586 

2587 

2583 

2589 

2590 

2591 

2592 

2593 

2594 

2595 

2596 

2597 

2598 

2599 

2600 

2601 

2602 

2603 

2604 

2605 

2606 

2607 

2608 

2609 

2610 

2611 

2612 

2613 

2614 

2615 

2616 

2617 

2618 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 
2630 



031040 
031044 
031046 
031050 
031052 
031056 
031062 
031070 
031074 
031102 
031104 
031110 
031116 
031122 
031126 
031130 
031132 
031136 



031142 
031142 

031150 
031156 
031162 
031164 
031170 
031176 
031204 
031206 
031212 
031216 
031222 
031224 

031226 
031234 
031242 
031246 
031252 
031260 
031264 
031270 
031272 
031276 
031302 
031306 



005737 


014522 




100$: 


TST 


PWRFL 




DID WE EXPECT POWER FAIL? 


001002 








BNE 


101$ 




BRANCH IF YES 


104001 








ERROR 


1 




MASTER ERROREOUSLY POWER FAKED 


000404 








BR 


102$ 




CONTINUE 


005060 


017012 




101$: 


CLR 


NOPRMP(RO) 


ALLOW CPU IDENTIFICATION 


104401 


042052 






TYPE 


.TM103 




CPU POWER FAIL MSG 


012737 


000001 


014530 


102$: 


MOV 


#1. 


PATCHK 


•SET UP FOR PATTERN CHECK 


004737 


03270C 






JSR 


PC, 


PATTRN 


CHECK THE PATTERN 


032737 


000001 


177572 


103$: 


BIT 


#1. 


MMRO 


•ARE WE IN HIGH CORE? 


001411 








BEQ 


104$ 




•BRANCH IF NO 


004737 


033166 






JSR 


PC. 


RELOLO '. 


•ELSE RELOCATE 


012737 


000001 


014536 




MOV 


#1. 


RELODN 


•SIGNAL THE SLAVES 


005037 


177572 






CLR 


MMRO 




WE ARE NOW BACK DOWN IN LOW CORE 


005037 


014532 






CLR 


HI CORE 




;MAXE SURE MM ON POWER-UP DISABLED 


005005 






104$: 


CLR 


R5 




.-MAKE TS23A DELAY 


077501 








S08 


R5. 






162702 


000002 






sue 


#2. 


R2 


,-POJNT TO NEXT BOX 


000137 


030454 






JMP 


2$ 




.•CONTINUE 



012777 000024 



112761 
106237 
103375 
005237 
012737 
023737 
001374 
005037 
005037 
020027 
001001 
000474 

052777 
012777 
016006 
005060 
012760 
012703 
005737 
001404 
005037 
000137 
005737 
001421 



000024 
016776 

014546 
000001 
016774 

014540 
177776 
000000 



100000 
000024 
014200 
014612 
040630 
031372 
014540 

177572 
032164 
014534 



163020 
014002 



016776 
014546 



••ft************************************************************** 

}^TEST 24 CHECK DC POWERFAIL ON MEM BOXES. CPUS BOOT ON POWER UP 

TST24: 

#24.3DISPLAY ;SET TEST NUMBER 



2$: 



1$: 



165574 
162726 



014702 



TS248: 



1$: 



MOV 

M0V8 

ASRS 

BCC 

INC 

MOV 

CMP 

BNE 

CLR 

CLR 

CMP 

BNE 

BR 

BIS 
MOV 
MOV 
CLR 
MOV 
MOV 
TST 
BEQ 
CLR 
JMP 
TST 
BEQ 



#24, $TSTNM(R1 ) 

SYNC. 3 

2$ 

ENTR24 

#1. SYNC. 3 
CPUACT. ENTR24 
1$ 

EXIT 
PSW 

RO, #0 

TS248 

TS24A 

#BIT15, 3ACR 
#24. 3D I SPLAY 
$$STP(R0). SP 
PFFT(RO) 

#CPUER. ERRTAB(RO) 

#100$. R3 

EXIT 

1$ 

MMRO 

TST25 

RELOUP 

2$ 



SET THE TEST NUMBER 
CONTROL THE ENTRY 

INCREMENT ENTER FLAG 
ALLOW THE OTHERS IN 
ARE ALL CPUS HERE? 
NOT YET 

CLEAR THE EXIT FLAG 

SET KERNAL MODE 

IS THIS THE MASTER? 

BRANCH IF NO 

THIS IS THE MASTER 

INITIALIZE THE 1 1ST 
SET TEST NUMBER 
INITIALIZE THE STACK 
SPECIFY THE POWER FAIL 
SET FOR UNEXPECTED TRAPS TO 4 
SET FOR POWER FAIL RETURN 
FINISHED WITH THIS TEST? 
BRANCH IF NO 

MAKE SURE MM IS TURNED OFF 
GO TO NEXT TEST 
TIME TO RELOCATE? 
BRANCH IF NO 



J 
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2631 031310 004737 032604 JSR 

2632 031314 063737 014550 172340 ADD 

2633 031322 063737 014550 17234? ADD 

2634 031330 063737 014550 172344 ADD 

2635 031336 052737 000001 177572 BIS 

2636 031344 005037 014534 CLR 

2637 031350 000726 BR 

2638 031352 005737 014536 2$: TST 

2639 031356 001723 BEQ 

2640 031360 005037 177572 CLR 

2641 031364 005037 014536 CLR 

2642 031370 000716 BR 
2643 

2644 031372 005737 014522 100$: TST 

2645 031376 001002 BNE 

2646 031400 104001 ERROR 

2647 031402 000711 BR 

2648 031404 005060 017012 101$: CLR 

2649 031410 104401 042052 TYPE 

2650 031414 000704 BR 
2651 

2652 
2653 

2654 031416 TS24A: 

2655 031416 005700 TST 

2656 031420 001007 BNE 

2657 031422 104401 041713 TYPE 

2658 031426 005046 CLR 

2659 031430 116116 014002 MOVB 

2660 031434 104403 TYPOS 

2661 031436 000002 .WORD 

2662 031440 5$: 

2663 031440 012737 000000 014522 MOV 

2664 031446 012737 000001 0145?6 MOV 

2665 031454 004737 032342 JSR 

2666 031460 005737 014540 TST 

2667 031464 001402 BEQ 

2668 031466 000137 032164 JMP 

2669 031472 012702 000016 1$: MOV 

2670 031476 052777 100000 165324 2$: BIS 

2671 031504 012777 000024 162456 MOV 

2672 031512 016006 014200 MOV 

2673 031516 005060 014612 CLR 

2674 031522 012760 040630 014702 MOV 

2675 031530 005702 TST 

2676 031532 002012 BGE 

2677 031534 012737 000112 000110 MOV 

2678 031542 005037 000000 CLR 

2679 031546 012737 000001 014540 MOV 

2680 031554 000137 032164 JMP 

2681 031560 005762 014502 3$: TST 

2682 031564 003037 BGT 

2683 031566 001403 BEQ 

2684 031570 162702 000002 SUB 

2685 031574 000740 BR 

2686 031576 022737 000001 014646 4$: CMP 
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PC. SETMM ;GET READY FOR RELOCATION 

HI80X. KIPARO 

HIBOX. KIPAR1 

HI80X. KIPAR2 

#1. MMRO .-SLAVE IS NOW IN HIGH CORE 

RELOUP .-CLEAR RELOCATION FLAG 

TS248 ; CONTINUE TESTING 

RELODN .TIME TO RELOCATE? 

TS248 .-BRANCH IF NO 

MMRO .-RETURN TO LOW CORE 

RELODN ; CLEAR THE FLAG 

TS24B .-CONTINUE 

PWRFL ; SHOULD WE BE HERE? 

101$ .-BRANCH IF YES 

1 .-UNEXPECTED CPU POWER FAIL 

TS248 .'CONTINUE TESTING 

NOPRMP(RO) .'WANT TO IDENTIFY THE CPU 

.TM103 .-EXPECTED CPU POWER FAIL 

TS24B .-CONTINUE TESTING 



RO ;IS THIS THE MASTER? 

5$ ; BRANCH IF NO 

,TM77 .■'TEST** 
-(SP) 

$TSTNM(R1).(SP) ;GET THE TEST NO. 

2 ;TYPE 2 DIGITS, NO LEADING 0 

#0. PWRFL .-SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 

#1. BOOT .-SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND I 

PC. MEMSIZ ;FIND ALL THE MEM BOXES 

EXIT .-WAS ONLY ONE MEM BOX FOUND? 

1$ .BRANCH IF NO 

TST25 ;WE CAN'T DO THIS TEST 

#16. R2 .-POINT TO BOX #7 

#BIT15, 3ACR .-INITIALIZE THE IIST 

#24, 3D I SPLAY ;SET THE TEST NUMBER 

$SSTP(RO), SP .-INIALIZE THE STACK 

PFFT(RO) .-SPECIFY THE POWER FAIL 

#CPUER. ERRTAB(RO) ;SET FOR UNEXPECTED TRAPS TO 4 

R2 ;DID WE TEST ALL THE BOXES 

3$ .-BRANCH IF NO 

#112, a#110 .RESTORE LOC 110 

WO .-RESTORE LOC 0 

#1. EXIT .-SIGNAL THE SLAVES TO EXIT 

TST25 ;G0 TO THE NEXT TEST 

START (R2) ;WHAT DO WE KNOW ABOUT THIS BOX -5 

10$ .BRANCH IF NOT THE BASE BOX 

4$ .-BRANCH IF ITS THE BASE BOX 

#2. R2 .-THERE WAS NO BOX-POINT lO THE NEXT LOWER BOX 

2$ ; CONTINUE 

#1, BOXNUM .-WAS THERE ONLY ONE MEM BOX^ 
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P11 


I 3-MAR-80 


16:04 




T24 


CHECK 


2687 


031604 


002027 








BGE 


2688 


031606 


005737 


014526 






TST 


2689 


031612 


001141 








BNE 


2690 


031614 


004737 


033042 






JSP 


2691 














2692 


031620 


012737 


000001 


014532 




MOV 


26 f >3 


C31626 


012737 


000001 


014534 




MOV 


2694 


031634 


063737 


014550 


1 72340 




ADD 


2695 


031642 


063737 


014550 


1 72342 




ADD 


2696 


031650 


063737 


014550 


172344 




ADD 


2697 


031656 


052737 


000001 


177572 




BIS 


2698 


031664 








10$: 




2699 


031664 


005037 


014530 




11$: 


CLP. 


2700 


031670 


004737 


032700 






JSR 


2701 


031674 


004737 


032566 






JSR 


2702 


031700 


104401 


042534 






TYPE 


2703 


031704 


006202 








ASR 


2704 


031706 


010246 








MOV 


2705 


031710 


104405 








TYPDS 


2706 


031712 


006302 








ASL 


2707 


031714 


104401 


044270 






TYPE 


2708 


031 720 


012703 


032062 






MOV 


2709 


031 724 


005737 


014526 






TST 


2710 


031730 


001414 








BEQ 


2711 


031 732 


012737 


020000 


000000 


13$: 


MOV 


2712 


031 740 


005237 


000110 






INC 


2713 


031 744 


105777 


162240 






TSTB 


2714 


031 750 


100370 








BPL 


2715 


031 752 


012777 


033226 


165054 




MOV 


2716 


031760 


000413 








BR 


2717 


031 762 








12$: 




2718 


031 762 


105777 


162222 






TSTB 


2719 


031766 


100375 








BPL 


2720 


031770 


005737 


014522 




17$: 


TST 


2721 


031 774 


001402 








BEQ 


2722 


031 776 


104024 








ERROR 


2723 


032000 


000441 








BR 


272** 


032002 


104401 


047252 




18$: 


TYPE 


272^ 


032006 


000436 








BR 


272b 


032010 


01 7704 


162144 




14$: 


MOV 


2727 


032014 


042704 


177760 






BIC 


2728 


032020 


012777 


000000 


165002 




MOV 


2729 


032026 


010477 


165000 






MOV 


2730 


032032 


032737 


000001 


016774 




BIT 


2731 


032040 


001404 








BEQ 


2732 


032042 


012777 


000001 


164762 




MOV 


2733 


032050 


000422 








BR 


2734 


032052 


012777 


000003 


164752 


15$: 


MOV 


2735 


032060 


000416 








BR 


2736 














2737 


032062 


005737 


014522 




100$: 


TST 


2738 


032066 


001002 








BNE 


2739 


032070 


104001 








ERROR 


2740 


032072 


000404 








BR 


2741 


032074 


005060 


017012 




101$: 


CLR 


2/42 


032100 


104401 


042052 






TYPE 
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11$ 




BRANCH IF YES 


BOOT 




IS THIS THE DC TEST? 


103$ 




BRANCH IF YES 


PC. 


RELOHI ; 


TO TEST THE BASE BOX, 






RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 


*\ 


HI CORE ; 


TURN MM ON ON POWER-UP 


#1. 


RE LOUP 


SIGNAL SLAVES TO RELOCATE 


HJ80X, 


KIPARO 


GET READY TO GO TO HIGH CORE 


HJBOX, 


KIPAR1 




HI80X. 


KIPAR2 




#1. 


MMRO ;WE ARE NOW IN HIGH CORE 


PATCHK 


;SET TO WRITE PATTERN 


PC. 


PATTRN ; WRITE THE PATTERN 


PC. 


BUFCLR 


/* 1 F A F, V ■ MF LJ F ufSA m 1 P F F fs 

CLEAR THE KEYBOARD BUFFER 


. TM1 06 


* 


TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 


R2 






R2. 


-(SP) 




R2 






.TM110 




SPECIFY THE CONDITIONS 


#100$. 


R3 '. 


SET UP THE POWER FAIL RETURN 


BOOT 




r c T i|ir Ti ip t\ r ?rr ti 

•IS THIS THE DC TEST? 


12$ 




^sf* Attn i t f & tF\ 

•BRANCH IF NO 


#20000. a#o 


•MAKE BOOTING SLAVE SP=20000 


a#no 




•HANG THE SLAVES BOOT 


3$TKS 




•IS CHARACTER IN BUFFER? 


13$ 




LOOP 


#ENTR, 


aiSTVEC \ 


;SET UP TO INTERRUPT SLAVES 


14$ 




•CONTINUE 


a$TKS 




;IS CHARACTER IN THE BUFFER? 


12$ 




;L0OP 


PWRFL 




. h ^ ti ir mac ten ii«wr rv^ f r> r * t i r r\ n 

SHOULD THE MASTER HAVE rOWfcH FAILED? 


18$ 




; BRANCH IF NO 


24 




•FAfllBF TO PTIUPQ C ATI 


102$ 




; CONTINUE 


.OK 






102$ 






aswR. 


R4 


rGET THE SWITCH VALUES 


#177760. R4 


;SAVE ONLY CPU BITS 


#PGTE. 


dACR 


;ACCESS PGTE REG 


R4. 


9ADR 


;SET INTERRUPT BITS 


#8IT0. 


CPUACT 


;EVEN OR ODD? 


15$ 




.•BRANCH IF EVEN 


#1. 


3ADR 


; INTERRUPTING AN EVEN NUMBER OF SLAVES 


103$ 






#3. 


8ADR 


•INTERRUPTING AN ODD # OF SLAVES 


103$ 






PWRFL 




;DID WE EXPECT POWER FAIL? 


101$ 




; BRANCH IF YES 


1 




; MASTER ERROREOUSLY POWER FAILED 


102$ 




.•CONTINUE 


NOPRMP(RO) 


,-ALLOW CPU IDENTIFICATION 


.TM103 




;CPU POWER FAIL MSG 



N 5 
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2743 


032104 


012737 


«X S\ A A A 

000001 


014530 


102$: 


MOV 


#1 . PATCH* 
PC. PATTRN 


;SET UP FOR PATTERN CHECK 


2744 


032112 


004737 


032700 






JSR 


.-CHECK THE PATTERN 


2745 


032116 


032737 


000001 


177572 


103$: 


BIT 


#1 . MMRO 


.ARE WE IN HIGH CORF? 


2746 


032124 


001411 








BEQ 


1 rt / * 

104$ 


.'BRANCH IF NO 


2747 


032126 


004737 


033166 






JSR 


PC. REL0L0 


;ELSE RELOCATE 


2748 


032132 


012737 


A A A A 4 

000001 


014536 




MOV 


#1. REL0DN 


; SIGNAL THE SLAVES 


2749 


032140 


005037 


177572 






CLR 


MMRO 


;WE ARE NOW BACK DOWN IN LOW CORE 


2750 


032144 


005037 


014532 






CLR 


HI CORE 


.MAKE SURE MM ON POWER-UP DISABLED 


2751 


032150 


005005 






104$: 


CLR 


R5 


.MAKE TS24A DELAY 


2752 


0321 52 


077501 








S06 


R5. 




2753 


032154 


162702 


A A A A A A 

000002 






SUB 


#2. R2 


.-POINT TO NEXT BOX 


2754 


032160 


000137 


031476 






JMP 


A A 

2$ 


.•CONTINUE 


2755 


















2756 


















27V7 


















2758 


















2759 


















A ^ V A 

2760 


















2761 


















2762 










••**»»»*»»***»**»****•»*•*******♦*•********»****•**»**»»*»•****•* 


2763 










;*TEST 


25 


CHECK SYSTEM RECOVERY ON AC POWER FAIL 


17/ y 

2764 












2765 


032164 
















27 bo 


/\711 / / 

032164 


Ai 1777 

012777 


AAAA1C 

000025 


1/1 77/ 

161 77b 




rvv 


#25. 3D I SPLAY 


;SET TEST NUMBER 


2767 


A»11 71 

032172 


111 7/ 1 

11 2761 


AAAA1C 

000025 


Ai y AAT 

014002 




nuvD 


#25. $TSTNM(R1) ;SET THE TEST NUMBER 


2768 


032200 


a -7* ^ ^^A 

032770 


AArt y A A 

000400 


A ^ y 1 / rt 

014160 




ft! T 


#SW08. aSWR(RO) 


.-SKIP THIS TEST? 


2769 


ati "^/"v/ 

032206 


001002 








OKIE 

one 


1$ 


.-BRANCH IF NO 


2770 


A7111 A 

032210 


AAA1 77 

000137 


A7 C 71/ 

035326 






JMP 


$E0P 


.-ELSE GO TO EOP 


T771 

277 \ 


A7J111 / 

032214 








1$: 






^77T 

2772 


A71H / 

032214 


020027 


AAAAAA 

000000 






CMP 


R0.#0 


.•SWITCH THIS PROCESSOR? 


2775 


A7111A 

032220 


001002 








BNE 


64$ 


.-BRANCH IF NO 


1 "7 "7/ 

277** 


A71111 

032222 


000137 


032232 






JMP 


TS25A 


; YES, SWITCH TO A. 




AT11V 

032226 


000137 


032264 




64$: 


JMP 


TS258 


;NO, SWITCH TO B. 


177/ 

dr 7b 


052252 








TS25A: 






1777 

2777 


A7 1171 

032232 


AAf 

005700 








TST 


R0 


;IS THIS THE MASTER? 


2778 


032234 


A A 1 rtrt^ 

001007 








BNE 


5$ 


.-BRANCH IF NO 
.-"TEST" 


2779 


032236 


1 Ay / Ai 

104401 


/-\ / 1 -^i 7 

041713 






TYPE 


.TM77 


2780 


AT11/ 1 

032242 


AACA/ Z 

005046 








CLR 


-(SP) 




2781 


A711/ / 

032244 


11/11/ 

1 16 1 16 


A 1 / AAT 

014002 






M0V8 


$TSTNM(R1).(SP) 


.-GET THE TEST NO. 


2(82 


ft711 c A 

032250 


1 A/ y A7 

104403 








TYPOS 




170 -J 

2783 


A711C 1 

032252 


AAAAAT 

000002 








.WORD 


2 


.-TYPE 2 DIGITS. NO LEADING 0 


170V 

278m 


032254 








5$: 








170C 

2785 


A711C / 

032254 


1 Ay y A1 

104401 


Ai / 77 7 

014333 






TYPE 


,$CRLF 




2786 


032260 


1 Ay y A1 

104401 


Ay n 1 c 

0421 15 






TYPE 


.TM104 


.-"POWER FAIL ENTIRE SYSTEM" 


1707 

2787 


A 72 11/ / 

032264 


A4 17/ A 

012760 


A A / A Art 

004000 


A 1 / / 1 1 

014612 


TS258: 


MOV 


#TI. PFFT(RO) 




2788 


052272 


AACAA7 

005003 








CLR 


R3 




2789 


032274 


AACA77 

005037 


A1 y 71 y 

014714 






CLR 


SYNC. 2 




2790 


A717AA 

032300 


AAAAA1 

00000/ 








WAIT 




;WAIT FOR POWER TO FAIL 


27v i 


032302 


1 AX 177 
106237 


016776 




3$: 


ASRB 


SYNC. 3 


.-CONTROL THE CPUS 


c r 7t 




I \JJJf J 








BCC 


3$ 


2793 


032310 


005237 


014714 






INC 


SYNC. 2 


.-COUNT THE CPUS 


2794 


032314 


012737 


000001 


016776 




MOV 


#1. SYNC. 3 


.-ALLOW ANOTHER IN 


2795 


032322 


023737 


016774 


014714 


1$: 


CMP 


CPUACT, SYNC. 2 


2796 


032330 


001374 








BNE 


1$ 




2797 


032332 


104401 


014220 






TYPE 


,$NULL 




2798 


032336 


000137 


035326 






JMP 


$E0P 


;G0 TO END OF PASS 
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13-MAR-80 16; 
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SEO 0066 



2799 














2800 












.S8TTL 


2801 


032342 


005002 






MEMSIZ: 


CLR 


2802 


032344 


012704 


172100 






MOV 


?803 


032350 


005037 


014646 






CLR 


2804 


032354 








It: 




2805 


032354 


012760 


032476 


014702 




MOV 


2806 


032362 


052714 


000010 






BIS 


2807 


032366 


01 2462 


014462 






MOV 


2808 


032372 


000362 


014462 






SWAB 


2809 


032376 


042762 


177600 


014462 




BIC 


2810 


032404 


012462 


014502 






MOV 


2811 


032410 


042762 


177000 


014502 




BIC 


2812 


032416 


016205 


014502 






MOV 


2813 


032422 


072527 


000012 






ASH 


2814 


032426 


010562 


014502 






MOV 


2815 


032432 


016205 


014462 






MOV 


2816 


032436 


072527 


000012 






ASH 


2817 


032442 


010562 


014462 






MOV 


2818 


032446 


066262 


014502 


014462 




ADD 


2819 


032454 


005237 


014646 






INC 


2820 


032460 


005762 


014502 






TST 


2821 


032464 


001413 








BFQ 


282? 


032466 


016237 


014502 


014550 




MOV 


2823 


032474 


000407 








BR 


2824 


032476 


012762 


U7777 


014502 


100S: 


MOV 


2825 


032504 


062706 


000004 






ADD 


2826 


032510 


062704 


000004 






ADD 


2827 


032514 


062702 


000002 




101$: 


ADD 


2828 


032520 


022702 


000020 






CMP 


2329 


032524 


003313 








BGT 


2830 


032526 


012760 


040630 


014702 




MOV 


2831 


032534 


022737 


000001 


014646 




CMP 


2832 


032542 


002410 








BLT 


2833 


032544 


005737 


014522 






TST 


2834 


032550 


001005 








BNE 


2835 


032552 


104401 


044206 






TYPE 


2836 


032556 


012737 


000001 


014540 




MOV 


2837 














2838 


032564 


000207 






102$: 


RTS 


2839 














2840 


032566 


105777 


161416 




BUFCLR: 


TST8 


2841 


032572 


100003 








BPL 


2842 


032574 


117705 


161412 






M0V8 


2843 


032600 


000772 








BR 


2844 


032602 


000207 






1$: 


RTS 


2845 














2846 


032604 


005037 


172340 




SETMM: 


CLR 


2847 


032610 


012737 


077406 


172300 




MOV 


2848 


032616 


012737 


000200 


172342 




MOV 


2849 


032624 


012737 


077406 


172302 




MOV 


2850 


032632 


012737 


000400 


172344 




MOV 


2851 


032640 


012737 


077406 


1 72304 




MOV 


2852 


032646 


012737 


177600 


172356 




MOV 


2853 


032654 


012737 


077406 


172316 




MOV 


2854 


032662 


012737 


000020 


172516 




MOV 



MEMORY BOX TEST ROUTINES 



R2 

#172100. 
BOXNUM 



;GET SET TO FILL THE START AND STOP TABLES 
R4 .-POINT TO THE FIRST CSR 

.•START WITH 0 BOXES 



#100$. ERRTAB(RO) 
#10. (R4) 
(R4)+, ST0P(R2) 
ST0P(R2) 

#177600. ST0P(R2>; 

(R4)+. START (R2) 

#177000. START (R2) 

START (R2), R5 

#10.. R5 

R5. START (R2) 

ST0P(R2), R5 

#10.. R5 

R5, ST0P(R2) 

START (R2). ST0P(R2) 

BOXNUM 

START (R2) 

101$ 

START(R2). HI80X 
101$ 

#-1. START (R2) 

#4. SP 

#4, R4 

#2. R2 

#26. R2 

1$ 

#CPUER. ERRTAB(RO) 
#1 . BOXNUM 
102$ 
PWRFL 
102$ 
,TM109 
#1. 



EXIT 



PC 



a$TKS 
1$ 

AST KB, R5 

BUFCLR 

PC 

KIPARO 

#77406. KIPDRO 
#200. KIPAR1 
#77406, KIPDR1 
#400. KIPAR2 
#77406 KIPDR2 
#17760o. 
#77406, KIPDR7 
#20. MMR3 



SE T UP FOR NO BOX 

SET UP TO GET BOX CAPACITY 



NOW WE HAVE IT 

NOW GET THE STARTING ADR. 

MAKE IT LOOK LIKE A PAR 



DO THE SAME FOR STOP 



STOP=START+CAPACITY 
INCREMENT BOX COUNT 
IS THIS THE BASE BOX? 
BRANCH IF YES 
GET A BOX TO RELOCATE TO 

INDICATE NON-EXISTENT BOX 

RESTORE THE STACK 

POINT TO NEXT CSR PAIR 

POINT TO NEXT TABLE LOCATIONS 

HAVE WE LOOKED FOR EIGHT BOXES' 

BRANCH IF NO 

RESET TRAP TO 4 POINTER 

WAS THERE MORE THAN A SINGLE BOX? 

BRANCH IF YES 

IS THIS TEST 23? 

BRANCH IF YES 

PRINT ONLY ONE BOX MSG 

SIGNAL TO EXIT 

RETURN 

IS THE BUFFER EMPTY^ 

BRANCH IF YES 

FLUSH IT 

LOOP 

RETURN 

SET UP PARS 0.1.2.7 



KIPAR7 



J 
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2855 


032670 


012737 


033534 


000250 




MOV 


2856 


0326/6 


000207 








RTS 


2857 














2858 


032700 


005737 


014526 




PATTRN: 


TST 


2859 


032704 


001055 








BNE 


2860 


032706 


005762 


014502 






tst 


2861 


032712 


001452 








BEQ 


2862 


032714 


004737 


032604 






JSR 


2863 


032720 


016237 


014502 


172346 




MOV 


2864 


032726 


012737 


077406 


172306 




MOV 


2865 


032734 


012760 


040630 


014702 




MOV 


2866 


032742 


052737 


000001 


177572 




BIS 


2867 


032750 


012705 


060000 




1$: 


MOV 


2868 


032754 


026237 


014462 


172346 




CMP 


2869 


032762 


003424 








BLE 


2870 


032764 


005737 


014530 




2$: 


TST 


2871 


032770 


001002 








BNE 


2872 


032772 


012715 


152525 






MOV 


2873 


032776 


022725 


152525 




3$: 


CMP 


2874 


033002 


001405 








BEQ 


2875 


033004 


013760 


1 72346 


014250 




MOV 


2876 


033012 


104013 








ERROR 


2877 


033014 


000407 








BR 


2878 


033016 


022705 


100000 




<♦$: 


CMP 


28/9 


033022 


003360 








BGT 


2880 


033024 


062737 


000200 


1 72346 




ADD 


2881 


033032 


000746 








BR 


2882 


033034 








6$: 




2883 


033034 


005037 


177572 






CLR 


2884 


033040 


000207 






7$: 


RTS 


2885 














2886 


033042 


004737 


032604 




RELOHI : 


JSR 


2887 


033046 


012760 


040630 


014702 




MOV 


2888 


033054 


013737 


014550 


172346 




MOV 


2889 


033062 


012737 


077406 


172306 




MOV 


2890 


033070 


013737 


014550 


172350 




MOV 


2891 


033076 


062737 


000200 


172350 




ADD 


2892 


033104 


012737 


077406 


172310 




MOV 


2893 


033112 


013737 


014550 


172352 




MOV 


2894 


033120 


062737 


000400 


172352 




ADD 


2895 


033126 


012737 


077406 


172312 




MOV 


2896 


033134 


012704 


060000 






MOV 


2897 


033140 


005005 








CLR 


2898 


033142 


052737 


000001 


177572 




BIS 


2899 


033150 


012524 






i$: 


MOV 


2900 


033152 


022705 


060000 






CMP 


2901 


033156 


003374 








BGT 


2902 


033160 


005037 


177572 






CLR 


2903 


033164 


000207 








RTS 


2904 














2905 


033166 


005037 


172346 




RELOLO: 


CLR 


2906 


033172 


012737 


000200 


1 72350 




MOV 


2907 


033200 


012737 


000400 


1 72352 




MOV 


2908 


033206 


012704 


060000 






MOV 


2909 


033212 


005005 








CLR 


2910 


033214 


012524 






1$: 


MOV 



C 6 

MACY11 30A(1052) 
ROUTINES 

#MMERR. MMVEC 

PC 



BOOT 
7$ 

START (R2) 
7$ 

PC. SETMM 
START (R2). KIPAR3 
#77406, KIPDR3 
#CPUER, ERRTAB(RO) 
#1 t MMRO 
#60000, R5 
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r EQ 006 7 



ST0P(R2). 
6$ 

PATCH* 
3$ 

#152525, 
#152525, 
4$ 

KIPAR3. SREGKRO) 

13 

6$ 

#100000. R5 
2$ 

#200, KIPAR3 
1$ 



KIPAR3 



(R5) 
(R5)* 



MMRO 

PC 

PC, 

#CPUER, 

Hieox, 

#77406, 

HI80X, 

#200. 

#77406. 

HI80X, 

#400. 

#77466. 

#60000, 

R5 

#1, 

(R5)+ t 

#60000, 

1$ 

MMRO 

PC 



SETMM 

ERRTAB(RO) 

KIPAR3 

KIPDR3 

KIPAR4 

KIPAR4 

KIPDR4 

KIPAR5 

KIPAR5 

K1PDR5 

R4 

MMRO 

(R4) + 
R5 



KIPAR3 

#200, KIPAR4 
#400, KIPAR5 
#60000, R4 
R5 

(R5) + . (R4H 



ARE WE DOING THE DC TEST? 

BRANCH IF YES 

ARE WE DOING THE BASE BOX? 

BRANCH IF YES 

SET UP PARS 0.1,2.7 

USE PAR3 TO WRITE PATTRN 

SET UP FOR UNEXPECTED TRAPS 

TURN ON MM 

POINT TO PAR3 SPACE 

IS THIS THE END OF THE BOX' 

BRANCH IF YES 

ARE WE WRITING A PATTERN? 

BRANCH IF ONLY READING IT 

WRITE THE PATTERN 

IS THE PATTERN CORRECT? 

BRANCH IF YES 

SAVE THE BAD ADDRESS (PAR) 

MEMORY IS CORRUPTED 

REPORT ONLY ONE ERROR 

ARE WE STILL IN PAR3 SPACE ' 

BRANCH IF YES 

ELSE RESET THE PAR 

AND CONTINUE 

.END MM 
.•RETURN 

.SET UP PARS 0,1.2.7 

.SET UP FOR TRAP TO 4 

;PARS 3,4,5 WILL TAKE US TO HIGH CORE 



POINT TO PAR 3 
POINT TO PARO 
TURN ON MM 

RELOCATE THE PROGRAM 
ARE WE FINISHED? 
BRANCH IF NO 
TURN OFF MM 



.USE PARS 3.4.5 TO RESTORE CODE TO LOW CORE 



POINT TO PAR 3 
POINT TO PAR 0 
RESTORE THE PROGRAM 
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2911 


033216 


022705 


060000 






CMP 


2912 


033222 


003374 








BOT 


2913 


033224 


000207 








RTS 


2914 














2915 


033226 


052737 


001000 


1 77746 


ENTR: 


BIS 


2916 


033234 


01 7705 


163570 






MOV 


2917 


033240 


072527 


177770 






ASH 


3918 


033244 


005004 








CLR 


2919 


033246 


026405 


014226 




65$: 


CMP 


2920 


033252 


001404 








BfcO 


2921 


033254 


005724 








TST 


2922 


033256 


020427 


000010 






CMP 


2923 


033262 


002771 








BLT 


2924 


033264 


010400 






64$: 


MOV 


2925 


033266 


010001 








MOV 


2926 


033270 


006201 








ASR 


2927 


033272 


052777 


100000 


163530 




BIS 


2928 


033300 


016006 


014200 






MOV 


2929 


033304 


012760 


034656 


014662 




MOV 


2930 


033312 


020027 


000000 






CMP 


2931 


033316 


001406 








BEQ 


2932 


033320 


005060 


017012 






CLR 


2933 


033324 


104401 


045163 






TYPE 


2934 


033330 


000137 


031226 






JMP 


2935 


033334 


104025 






1$: 


ERROR 


2936 


033336 


000000 








HALT 


2937 














2938 














2939 














2940 














2941 










•S8TTL 


PARI T 


2942 














2943 


033340 


005327 






PARERR: 


DEC 


2944 


033342 


000001 






PARFLG: 


• WORD 


2945 


033344 


002001 








BSE 


2946 


033346 


000000 








HALT 


2947 


033350 


013760 


177766 


014250 


1$: 


MOV 


2948 


033356 


013760 


177744 


014260 




MOV 


2949 


0333&4 


104007 








ERROR 


2950 


033366 


000000 








HALT 


2951 


033370 


013737 


177744 


177744 




MOV 


2952 


033376 


012737 


000001 


033342 




MOV 


2953 


033404 


000002 








RTI 


2954 










.S8TTL 


SETUP 


2955 














2956 


033406 


012737 


000000 


172340 


MAP: 


MOV 


2957 


033414 


012737 


077406 


172300 




MOV 


2958 


033422 


012737 


000200 


172342 




MOV 


2959 


033430 


012737 


077406 


172302 




MOV 


2960 


033436 


012737 


000400 


172344 




MOV 


2961 


033444 


012737 


077406 


172304 




MOV 


2962 


033452 


012737 


000000 


172352 




MOV 


2963 


033460 


012737 


077406 


172312 




MOV 


2964 


033466 


012737 


000200 


172354 




MOV 


2965 


033474 


012737 


000000 


172314 




MOV 


2966 


033502 


0T2737 


177600 


172356 




MOV 



D 6 

MACY11 30A(1052> 
IT ROUTINES 

#60000. R5 

1$ 

PC 

#81 T9. CONTRL 
SACR. R5 
#-10. R5 
R4 

$CPUID(R4>, 
64$ 
(R4>* 

R4. #10 
65$ 

R4, RO 
RO, R1 
R1 

#8IT15. 3ACR 
$$STP(RO>. 
#$PWRDN, 
RO. #0 
1$ 

NOPRMP(RO) 
. TM1 1 1 
TS24B 
25 
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ARE WE FINISHED? 
BRANCH IF NO 

RETURN-STILL EXECUTING IN HIGH CORE 



; TURN OFF CACHE 

;GET CPU ID 



SEQ 0068 



R5 



;SET UP RO 



.-SET UP R1 

.■INITIALIZE THE 1 1ST 
SP ;SET UP THE STACK 

PWRTAB(RO);SET UP FOR POWER DOWN 
; SHOULD WE BE HERE? 
.•BRANCH IF NO 



.RETURN SLAVES 
.UNEXPECTED INTERRUPT 
.-HALT THE MASTER 



t ERROR HANDLER 

(PO + 
1 

1$ 



.•FIRST TIME IN? 



CPUERR. $REG1(R0) 
MEMERR. $REG2(R0) 
7 



.•BRANCH IS YES 
.-ELSE HALT 



.•UNEXPECTED TRAP TO 114 



a#MEMERR.3#MEMERR ; CLEAR ERROR INDICATORS 
#1 .PARFLG .-INITIALIZE PARITY ERROR FLAG 

.•CONTINUE TESTING 
MEMORY MANAGMENT REGISTERS 



#0,3#KIPAR0 

#77406, aWUPDRO 

#200.a#KIPAR1 

#77406.a#KlPDR1 

#400.a#KIPAR2 

#77406, a#KlPDR2 

#0,a#KIPAR5 

#77406,a#KIPDR5 

#200,3#KIPAR6 

#0,a#KIPDR6 

#1 77600, a#KIPAR7 



SETUP PARO FOR 1ST 4< 
4K. R/W. EXPAND UP 
SETUP PARO FOR 2ND 4K 
4K,R/W,EXPAND UP 
SETUP PAR2 FOR NEXT 4K. 
4K, R/W, EXPAND UP 
SET UP PAR 5 FOR 1ST 4K 
4K. R/W. ED=UP 
SET UP PAR6 FOR 2ND 4K 
ABORT ALL REFERENCES 
;SET UP PAR 7 FOR I/O PAGE 



I 



•WINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 

CEKBGC.P11 ^-MAR-SO 16:(K SETUP MEMORY 



2967 


033510 


0 1 2737 


077406 


172316 




nov 


2968 


033516 


012737 


000020 


172516 




mov 


2969 


033524 


012737 


033534 


000250 




MOV 


2970 


.033532 


000207 








RTS 


2971 


033534 


000000 






MMERR: 


HALT 


2972 


033536 


000776 








BR 


2973 














2974 


033540 










. S8TTL 


2975 








M8USR : 




2976 


033540 


032737 
001774 


000200 


1 76700 


4$: 


BIT 


2977 


033546 








BEO 


2978 


033550 


156037 


014632 


176710 




BIS8 


2979 


033556 


012737 


174000 


1 76702 




MOV 


2980 


033564 


010437 


176704 






MOV 


2981 


033570 


005037 


176706 






CLR 


2982 


033574 


032737 


000200 


176712 


3$: 


BIT 


2983 


033602 


001774 








BEO 


2984 


033604 


052737 


000001 


1 76700 




BIS 


2985 


033612 


106237 


033534 




1$: 


ASR8 


2986 


033616 


106237 


033534 






ASRB 


2987 


033622 


106237 


033534 






ASRB 


2988 


033626 


106237 


033534 






ASRB 


2989 


033632 


106237 


033534 






ASRB 


2990 


033636 


106237 


033534 






ASRB 


2991 


033642 


106237 


033534 






ASRB 


2992 


033646 


106237 


033534 






ASRB 


2993 


033652 


106237 


033534 






ASRB 


2994 


033656 


106237 


033534 






ASRB 


2995 


033662 


032737 


000200 


176712 




BIT 


2996 


033670 


001750 








BE a 


2997 


033672 


005737 


176700 






TST 


2998 


033676 


100001 








BPL 


2999 


033700 


000000 








HALT 


3000 


033702 


000207 






2$: 


RTS 


3001 












.SBTTL 


3002 


033704 


012737 


033724 


000100 


SETCLK: 


MOV 


3003 


033712 


005204 








INC 


3004 


033714 


012737 


000100 


1 77546 




MOV 


3005 


033722 


000207 








RTS 


3006 


033724 


052737 


000340 


177776 


5$: 


BJS 


3007 


033732 


042737 


000200 


177546 




BIC 


3008 


033740 


005304 








DEC 


3009 


033742 


005704 








TST 


3010 


033744 


001010 








SNE 


3011 


033746 


005037 


1 77546 






CLR 


3012 


033752 


000240 








NOP 


5013 


033754 


000240 








NOP 


3014 


033756 


000240 








NOP 


3015 


033760 


000240 








NOP 


3016 


033762 


062716 


000004 






ADD 


3017 


033766 


162716 


000002 




6$: 


sue 


3018 


033772 


000002 






7$; 


RTI 


3019 














3020 














3021 














3022 















E 6 

MACrll 30AC1052) 
NAGMENT REGISTERS 

#77406,a#KIPDR7 

*8IT04,3#MMR3 

#MMERR.WMMVEC 

PC 

MMERR 



13-MAR-80 16:04 PAGE 57 



4K, R/W, ED=UP 

SET UP FOR 22-BIT MAPPING 

SET UP MEMORY MANAGEMENT VFCTOR 

RETURN FROM CALL 

MEMORY MANAGEMENT ERROR 



SEO 0069 



MASSBUS TRANSFER ROUTINES 



*BIT7, a#RPC51 
4$ 

MSDSU(RO), 
#-4000,a#RPWC 
R4,a*RPBA 
a*RPDA 

*8IT7, 3#RPDS 
3$ 

*8IT0.3#RPCS1 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

*8IT7.3#RPDS 
1$ 

a»RPCS1 
2$ 

PC 

LINE CLOCK ROUTINE 

#5$.a#100 

R4 

#BJT6.a#LKS 

PC 

#340,a#PS 

#8IT7.3#LKS 

R4 

R4 

6$ 

a*LKS 



;WAIT FOR CONTROLLER READY 

S*RPCS2 ;GET THE DRIVE * 
SET WORD COUNT 
SET MEMORY ADDRESS 
READ SECTOR 0 
;WAIT FOR DRIVE READY 



;;D0 ASRB DURING TRANSFER 



DEVICE READY? 
BRANCH IF NO. 
ANY ERRORS? 
NO 
YES 

RETURN 

SET THE INTERRUPT VECTOR FOR CLK 
ADD 1 TO THE ARGUMENT PASSED 
START THE CLOCK 
RETURN 

HIGH PRIORITY 

CLEAR THE MONITOR BIT 

ONE TICK 

COUNT TO ZERO? 

NO DON'T STOP THE CLOCK 

• W IT OFF 



#4,(SP) 
#2,(SP) 



SKIP RETURN 

IF COUNT ISN'T EXPIRED. . 
RETURN TO THE WAIT 



nAINOEC-1 1-CEKBG-C 
CEKBGC.P1 1 13-MAR-80 
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SEO 0070 



}G23 

3024 

3025 

3026 

3027 

3028 

3029 

3030 

3031 

3032 

3033 

3034 

3035 

3036 

3037 

3038 

3039 

3040 

3041 

3042 

3043 

3044 

3045 

3046 

3047 

5048 

3049 

3050 

5051 

3052 

3053 

3054 

3055 

3056 

3057 

3058 

3059 

3060 

3061 

3062 

3063 

3064 

3065 

3066 

3067 

3068 

3069 

3070 

3071 

3072 

3073 

3074 

3075 

3076 

30 77 

3078 



, S8TTL POWER FAIL ROUTINE (SECTION 1) 



033774 
034002 
034006 
034010 
034016 
034016 
034022 
034024 
034030 
034032 
034036 
034040 
034044 
034046 
034052 
034056 
034062 
034066 
034070 
034074 
034076 
034102 
034104 
034110 
034112 
034114 
034116 
034120 
034122 
034124 
034130 
034134 
034136 
034140 
034142 
034144 
034146 
034154 
034162 
034166 

034172 
034200 
034202 
034204 
034210 
034216 
034220 
034222 
034226 
034234 
034236 
034240 
034244 



012737 
105737 
001403 
042737 

022706 
100402 
016006 
010246 
012702 
012246 
022702 
103374 
01 3746 
013746 
01 3746 
012702 
012246 
022702 
103374 
012702 
012246 
022702 
103374 
010046 
010146 
010346 
010446 
010546 
010637 
005060 
060000 
060000 
060000 
160100 
160100 
012737 
012737 
000160 
005237 

023737 
001372 
000000 
005237 
023737 
001372 
000000 
005237 
023737 
001372 
000000 
005237 
023737 



0344 36 014662 
016740 



000020 

000440 

014200 

177572 

1 77676 

1 77776 
177746 
172516 
172200 

172376 

170200 

170376 



170016 



POWDWN: 

64$: 

1$: 
10$: 



20$: 



30$: 



014572 
016754 



034256 014662 
000001 016752 
034166 
016754 

016752 016754 



3$: 



016756 4$: 
01675? 016756 



016760 5$: 
016752 016760 



016762 6$: 
016752 016 7 62 



MOV 
TST8 
BEO 
BIC 

CMP 

BMI 

MOV 

MOV 

MOV 

MOV 

CMP 

BHIS 

MOV 

MOV 

MOV 

MOV 

MOV 

CMP 

BHIS 

MOV 

MOV 

CMP 

BHIS 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

ADD 

ADD 

ADD 

SUB 

SUB 

MOV 

MOV 

JMP 

INC 

CMP 

BNE 

HALT 

INC 

CMP 

BNE 

HALT 

INC 

CMP 

BNE 

HALT 

INC 

CMP 



#ILLUP,PWRTAB 

UBEF 

b4$ 

#8IT4.a#UBCR2 

#440, SP 
1 $ 

$$STP(RO),SP 

R2.-(SP) 

#MMR0.R2 

(R2)*.-(SP) 

#UDPAR7,R2 

10$ 

a#psw.-(sp) 

a#C0NTRL,-(SP) 

S#MMR3,-(SP) 

#SJPDR0.R2 

(R2H.-CSP) 

#KDPAR7,R2 

20$ 

#MAPL00,R2 
(R2H,-(SP> 
#WAPH37.R2 
30$ 

RO.-(SP) 

R1.-(SP) 

R3.-(SP> 

R4,-(SP) 

R5.-(SP) 

SP, SAV6 

COUNTO(RO) 

RO. RO 

RO. RO 

RO.RO 

R1.R0 

R1.R0 

#P0WUP, PUR TAB 
#1. LOOPS 
3$(R0) 
COUNTO 

LOOPS, COUNTO 
3$ 

C0UNT1 

LOOPS, C0UNT1 
4$ 

C0UNT2 

LOOPS. C0UNT2 
5$ 

C0UNT3 

LOOPS. C0UNT3 



;JF TOO FAST WITH POWER UP 
;;USE UNIBUS EXERCISER? 

;; CLEAR POWER FAIL ENABLE 

.•YELLOW OR RED? 
;N0 

.SET EMERGENCY STACK 
"SAVE R2 

•SAVE PSW THRU MMRO 



•SAVE PSW 

•SAVE CACHE CONTROL 
.SAVE MMR3 

.-SAVE SIPDRO THRU KDPAR7 



.SAVE THE UNIBUS MAP 



.-SAVE THE GENERAL REGISTERS 



SAVE THE STACK 
CLEAR LOOP COUNTER 

INDEX TO THE RIGHT COUNTER 



; ENABLE GOOD POWER-UP 

;K OF LOOPS FOR 2 MS (WORST CASE CONTENTION) 
.START LOOPING UNTIL DC POWER FAILS 



2MS UP? 
BRANCH IF NO 
FINISHED 



nAINDEC-1 1-CEKBG-C POP-11/70 
CEKBGC.P1 1 13-WAR-80 16:04 



3079 


034252 


001372 








BNE 


3080 


C34254 


000000 








HALT 


3081 














3082 


034256 








POWUP: 




3083 


034256 


012737 


034442 


014662 




MOV 


3084 


034264 


013706 


014572 






MOV 


3085 


034270 


012605 








MOV 


3086 


034272 


012604 








MOV 


3087 


034274 


012603 








MOV 


3088 


034276 


012601 








MOV 


3089 


034300 


012600 








MOV 


3090 


034302 


012702 


1 70400 






MOV 


3091 


034306 


012642 






10S: 


MOV 


3092 


034310 


'022702 


1 70200 






CMP 


3093 


034314 


103774 








BLO 


3094 


034316 


012702 


172400 






MOV 


3095 


034322 


012642 






20$: 


MOV 


3096 


034324 


022702 


172200 






CMP 


3097 


034330 


103774 








BLO 


3098 


034332 


012637 


172516 






MOV 


3099 


034336 


012637 


177746 






MOV 


3100 


034342 


012637 


177776 






MOV 


3101 


034346 


012702 


1 77700 






MOV 


3102 


034352 


012642 






30$: 


MOV 


3103 


034354 


022702 


1 77572 






CMP 


3104 


034360 


103774 








BLO 


3105 


034362 


012602 








MOV 


3106 


034364 


004737 


034446 






JSR 


3107 


034370 


012737 


033774 


014662 




MOV 


3108 


034376 


105737 


016740 






TSTB 


3109 


034402 


001403 








BEQ 


3110 


034404 


012737 


000001 


017022 




MOV 


3111 


034412 








2$: 




3112 


034412 


105737 


016737 






TSTB 


3113 


034416 


001403 








BEQ 


3114 


034420 


052737 


001000 


177746 




BIS 


3115 


034426 


052737 


000014 


1 77746 


1$: 


BIS 


3116 


034434 


000113 








JMP 


3117 














3118 


034436 


OOOOCO 






ILLUP: 


HALT 


3119 


034440 


000776 








BR 


3120 














3121 


034442 


000000 






ILLDUN: 


HALT 


3122 


034444 


000776 








BP 


3123 














3124 














3125 


034446 








TIMIT: 




3126 


034446 


023760 


016752 


016^54 




CMP 


3127 


034454 


001402 








BEQ 


3128 


034456 


104401 


045221 






TYPE 


3129 














3130 


034462 


000207 






1$: 


RTS 


3131 














3132 














3133 














3134 
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POWER FAIL ROUTINE (SECTION 1) 



6$ 
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SFQ 0071 



fILLDWN.PWRTAB; 

SAV6.SP 

<SP)*,R5 

(SP)*.R4 

(S C> )*.R3 

(SrO + .Rl 

(SP)*,RO 

#MAPH37+2.R2 

(SP)*.-(R2) 

#MAPl60.R2 

10$ 

#KDPAR7*2,R2 
<SP)*,-(R2) 
#SIPDR0.R2 
20$ 

<SP)*.a*MMR3 
(SP)*.a#CONTRL 

<sp)*,a#psu 

#UDPAR7*2.R2 
<SP)*.-(R2) 
#MMR0.R2 
30$ 

(SPJ+.R2 

PC. TIMIT 

fPOWDWN.PWRTAB 

UBEF 

2$ 

#1,UBELCK 



SET TOO FAST DOWN VECTOR 
'RESET SP 

•RESTORE THE REC STERS 



.•RESTORE UNI8' AP 



.•RESTORE K AND S PARS/PDRS 



RESTORE MMR3 
RESTORE CACHE CONTRL 
RESTORE PSU 
RESTORE PSU THRU MMRO 



.RESTORE R2 

; CHECK THE POWER-DOWN TIME 
.-RESET THE DOWN '.'ECTOR 
;UBE BEING USED? 
; BRANCH IF NO 
.CLEAR THE PF LOCK 



MPF .-MULTIPROCESSOR MODE? 

1$ ; BRANCH IF NO 

*1000.a#CONTRL .-BYPASS CACHE 
#14. WCONTRL ; TURN OFF CACHE 

<R3> ; JUMP INDIRECT TQ R3 



■2 
-2 



; POWER UP BEFORE POWER DOWN COMPLETE 
.LOCK UP THE HALT 

.-POWERED DOWN BEFORE UP COMPLETE 
.-LOCK UP THE HALT 



LOOPS. COUNTO(RO) ;DID WE HAVE ENOUGH POWER DOWN TIME 1 

1$ .-BRANCH IF YES 

,$DOWN ;NOT ENOUGH TIME 

PC 



MAINDEC-11-CEKBG-C PDP-11/70 
CEKBGC.P11 13-MAR-80 16:04 
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SEO 0072 



3135 












. S3TTL 


3136 


034464 








SPOWER: 




3137 


034464 


005737 


014532 






TST 


3138 


034470 


001451 








BEO 


3139 


034472 


005037 


172340 






CLR 


3K0 


034476 


012737 


077406 


1 72300 




MOV 


5141 


034504 


012737 


000200 


172342 




MOV 


3142 


034512 


012737 


077406 


172302 




MOV 


3H3 


034520 


012737 


000400 


172344 




MOV 


3144 


034526 


012737 


077406 


1 72304 




MOv 


3145 


034534 


012737 


177600 


172356 




MOV 


3146 


034542 
034550 


012737 


077406 


172316 




MOV 


3147 


012737 


000020 


172516 




MOV 


3148 


034556 


012737 


033534 


000250 




MOV 


3149 


034564 


063737 


014550 


1 72340 
1 72342 




ADD 


3150 


034572 


063737 


014550 




ADD 


3151 


034600 


063737 


014550 


172344 




ADD 


3152 


034606 


052737 


000001 


177572 




BIS 


3153 


034614 








1$: 




3154 


034614 


01 7705 


162210 






MOV 


3155 


034620 


072527 


177770 






ASH 


3156 


034624 


005004 








CLR 


3157 


034626 


026405 


014226 




65$: 


CMP 


3158 


034632 


001404 








BEG 


3159 


034634 


005724 








TST 


3160 


034636 


020427 


000010 






CMP 


3161 


034642 


002771 








BLT 


3162 


034644 


010400 






64$: 


MOV 


3163 


034646 


010001 








MOV 


3164 


034650 


006201 








ASR 


3165 


034652 


000170 


014662 






JMP 


3166 














3167 














3168 


034656 


012760 


035316 


014662 


$PWRDN: 


MOV 


3169 


034664 


032760 


000040 


014612 




BIT 


3170 


034672 


001403 








BEO 


3171 


034674 


012737 


000001 


014642 




MOV 


31 72 














3173 


034702 








10$: 




3174 


034702 


026006 


017052 






CMP 


3175 


034706 


100402 








BMI 


31/6 


034710 


016006 


014200 






MOV 


3177 


034714 


010246 






1$: 


MOV 


3178 


034716 


012702 


177572 






MOV 


3179 


034722 


012246 






100$: 


MOV 


3180 


034724 


022702 


1 77676 






CMP 


3181 


034730 


103374 








BHJS 


3182 


034732 


013746 


1 77776 






MOV 


3183 


034736 


013746 


1 77746 






MOV 


3184 


034742 


013746 


172516 






MOV 


3185 


034746 


012702 


172200 






MOV 


3186 


034/52 


012246 






20$: 


MOV 


3187 


034754 


022702 


172376 






CMP 


3188 


034760 


103374 








BHJS 


*189 


034762 


012702 


1 70200 






MOV 


3190 


034766 


012246 






30$: 


MOV 



POWER FAIL ROUTINE (SECTION 2) 



HI CORE 
1$ 

KIPARO 

#77406. KIPDRO 

#200 . K I PARI 

#77406. KIPDR1 

#400, KIPAR2 

#77406. KIPDR2 
#177600. 

#77406. KIPDR7 

#20, MMR3 

#MMERR, MMVEC 

HI80X, KIPARO 

HIBOX. K I PARI 

HIBOX. KIPAR2 

#1 , MMRO 



DID WE POWER DOWN IN HIGH CORE? 

BRANCH IF NO 

SET UP PARS 0,1.2.7 



KIPAR7 



R5 
R5 



aACR. 
#-10, 
R4 

$CPUID(R4), 
64$ 



R5 



; POWER-UP IN HIGH CORE 

.-COPY ACR 
;GET THE ID 
;SET UP RO 



<R4) + 
R4, 
65$ 
R4. 
RO. 
R1 

aPWRTAB(RO) 



#10 

RO 
R1 



#$ILLUP,PVRTA8(R0) 

#SSD,PFFT(RO) 

10$ 

#1. SIGNAL 



YELLIM(RO),SP 
1$ 

$$STP(RO).SP 

R2.-(SP) 

#MMR0.R2 

(R2)*.-(SP) 

#UDPAR7,R2 

100$ 

a#psw,-(SP) 

a#CONTRL.-(SP) 

a#MMR3.-(SP) 

#SIPDR0,R2 

<R2)*.-(SP) 

#KDPAR7.R2 

20$ 

#MAPL00.R2 

(R2)*.-(SP) 



; JUMP TO THE POWER ROUTINE 



SET UVECT FOR ILLEGAL UP 

SEND A SIGNAL? 

NO 



YELLOW OR RED? 
NO 

SET EMERGENCY STACK 
SAVE R2 

SAVE PSW THRU MMRO 



■SAVE PSW 

•SAVE CACHE CONTRL 
;SAVE MMR3 

.-SAVE SIPDRO THRU KDPAR7 



.-SAVE THE UNI8US MAP 



HAINDEC-11-CEKBG-C 
CEc.BGC.P11 13-MAR-80 



3191 

3192 

3193 

319A 

31 «5 

3196 

3197 

3198 

3199 

3200 

5201 

3202 

3203 

3204 

3205 

3206 

3207 

3208 

3209 

3210 

3211 

3212 

3213 

7 .214 

3215 

3216 

3217 

3218 

3219 

3220 

3221 

3222 

3223 

3224 

3225 

3226 

3227 

3228 

3229 

3230 

3231 

3232 

3233 

3234 

3235 

3236 

3237 

3238 

3239 

3240 

3241 

5242 

3243 

3244 

3245 

3246 



034770 
034 774 
034 7 76 
035000 
035002 

035004 
035006 
035010 
035014 
055020 
055026 
055030 
055052 
035034 
035036 
035040 
055046 
035052 

055056 
055064 
055066 
035070 
035074 
055102 
035104 
035106 
035112 
035120 
035122 
035124 
035130 
035136 
035140 

035142 
035150 
035154 
035156 
035160 
035162 
035164 
035166 
035172 
035174 
035200 
035202 
035206 
035210 
035214 
035216 
035222 
035226 
035232 
035236 



022702 
105374 
010046 
010146 
010346 

010446 
010546 
010660 
005060 
012760 
060000 
060000 
060000 
160100 
160100 
012737 
000160 
005237 

023737 
001372 
000000 
005237 
023737 
001372 
000000 
005237 
023757 
001372 
000000 
005237 
023737 
001372 
000000 

012760 
016006 
012605 
012604 
012603 
012601 
012600 
012702 
012642 
022702 
103774 
012702 
012642 
022702 
103774 
012637 
012637 
012637 
012702 
012642 



PDP-11/ 70 
16:04 

1 70376 
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SEQ 0073 



014572 
016754 

055142 014662 



000001 016752 

055052 

016754 

016752 016754 



016756 

016752 016756 



016760 

016752 016760 



016762 

016752 016762 



055522 014662 
014572 



170400 

170200 

1 72400 

172200 

172516 
177746 
177776 
177700 



40$: 



3$: 



4$: 



5$: 



6$: 



CMP 

BHIS 

MOV 

MOV 

MOV 

MOV 
MOV 
MOV 
CLR 
MOV 
ADO 
ADD 
ADD 
SUB 
SUB 
MOV 
JMP 
INC 

CMP 

BNE 

HALT 

INC 

CMP 

BNE 

HALT 

INC 

CMP 

BNE 

HALT 

INC 

CMP 

BNE 

HALT 



SPWRUP: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

10$: MOV 
CMP 
BLO 
MOV 

20$: MOV 
CMP 
BLO 
MOV 
MOV 
MOV 
MOV 

30$: MOV 



#MAPH37,R2 
30$ 

RO.-(SP) 
R1,-(SP) 
R5.-(SP) 

R4,-(SP) 
R5,-(SP) 

SP. SAV6(R0) 
COUNTO(RO) 
#$PWRUP. 
RO. RO 
RO. RO 
RO.RO 
R1.R0 
R1,R0 
#1. LOOPS 
5$(R0) 
COUNTO 

LOOPS. COUNTO 
5$ 

C0UNT1 

LOOPS. C0UNT1 
4$ 

C0UNT2 

LOOPS. C0UNT2 
5$ 

C0UNT5 

LOOPS, C0UNT3 
6$ 



.-SAVE THE GENERAL REGISTERS 



;SAVE THE STACK 
; CLEAR THE LOOP COUNTER 
PWRTA8(R0);GET SET FOR POWER-UP 

INDEX TO THE RIGHT COUNTER 



;# OF LOOPS FOR 2 MS (WORST CASE CONTENTION) 
.•START LOOPING UNTIL DC POWER FAILS 



2MS UP? 
BRANCH IT 
FINISHED 



NO 



#ILLDN,PWRTAB(RO) 
SAV6(R0),SP 
(SP) *.R5 
(SP)+,R4 
(SP)*,R3 
(SP)*,R1 
(SP)*.RO 
#MAPH37+2,R2 
(SP)*.-(R2) 
*MAPL00.R2 
10$ 

#KDPAR7*2,R2 
(SP)+.-(R2) 
#SIPDR0,R2 
20$ 

(SP)+.a*MMR3 
(SPH.a#CONTRL 

(sp)*.a#psw 

#UDPAR7«2.R2 
(SP)*.-(R2) 



;SET VECTOR FOR FAST DOWN 
.•RESTORE STACK 
; SAVE THE GENERAL REGISTERS 



.•RESTORE UN I BUS MAP 



.•RESTORE K AND S PARS/PDRS 



RESTORE MMR3 
RESTORE CACHE CONTRL 
RESTORE PSW 
RESTORE PSW *HRU ^0 
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SEO 0074 



3247 

3248 

3249 

3250 

3251 

3252 

3253 

5254 

3255 

3256 

3257 

3258 

3259 

3260 

3261 

3262 

3263 

3264 

3265 

3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 

3274 

3275 

3276 

3277 

3278 

3279 

3280 

3281 

3282 

3283 

3284 

3285 

3286 

3287 

3288 

3289 

3290 

3291 

3292 

3293 

3294 

3295 

3296 

3297 

3298 

3299 

3300 

3301 

3302 



035240 
035244 
035246 
035250 
035254 
035262 
035264 
035272 
035300 
035306 
035310 
035312 
035314 

035316 
035316 
035320 

035322 
035322 
035324 



035326 
035326 
035332 
035334 
035340 
0353-2 
035344 
035346 
035352 
035360 
035364 
035366 
035372 
035376 
035376 
035402 



022702 
103774 
012602 
004737 
032760 
001403 
012737 
012737 
012760 
005703 
001401 
010316 
000002 



000000 
000777 



000000 
000777 



106237 
103375 
105737 
001416 
005700 
001414 
005237 
012737 
005737 
001375 
016006 
000170 

005237 
012737 



177572 



034446 
000020 

000001 
OOOOOi 
034656 



014612 

014642 
014712 
014662 



45$: 



50$: 



$ILLUP: 



ILLDN: 



CMP 

BLO 
MOV 
JSR 
BIT 
BEQ 
MOV 
MOV 
MOV 
TST 
BEQ 
MOV 
RTI 



HALT 
BR 



HALT 
BR 



#MMR0.R2 
30$ 

(SPH.R2 
PC. TIMIT 
#SSU.PFFT(RO) 
45$ 

#1. SIGNAL 
*1,SYNC.1 

*$PWRDN.PWRTA8(R0) 

R3 

50$ 

R3.(SP) 



.•RESTORE R2 

CHECK THE POWER DOWN 
SEND SIGNALS? 
NO 



;THJS MAY UNLOCK THE OTHER CPUS 
SET VECTOR FOR POWER FAIl 
IS R3 ZERO? 
YES 

FUDGE RETURN ADDRESS ON STACK 



.POWER UP BEFORE POWER DOWN COMPLETE 
;HANG UP THE PROCESSOR 



.-POWER DOWN BEFORE UP COMPLETE 



016776 
016737 



014134 
000001 
014134 

014200 
037064 

014134 
000001 



, S8TTL END OF PASS ROUTINE 
; ••***•******•*******•*•**•**••****•••*****•••»*•••*•••••••••»•• 

•INCREMENT THE PASS NUMBER ($PASS) 

•INDICATE END-OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM 
•TYPE 'tND PASS fXXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT 

CPU #0 > AAAAA 
CPU #1 > BBBBB 
CPU #2 > CCCCC 
CPU #3 > DDDDD 
TOTAL SYSTEM-WIDE ERRORS YYYYY" 
•WHERE XXXXX, AAAAA, BBBBB. CCCCC. DDDDD. AND YYYYY ARE DECIMAL NUMBERS 
•IF THERE S A MONITOR GO TO IT 
•IF THERE ISN'T JUMP TO RESTAB 

$EOP: 



016776 



1$: 



4$: 



016776 



ASR8 


SYNC. 3 


• 


•CONTROL ENTRY 


BCC 


$EOP 






TSTB 


MPF 


* * 


MP MODE? 


BEO 


4$ 




; BRANCH IF NO 


TST 


RO 


* 


•IS THIS THE MASTER? 


BEQ 


4$ 


• 4 


■YES 


INC 


$EOPSG 






MOV 


#1. SYNC. 3 


0 


•ALLOW ANOTHER CPU IN 


TST 


$EOPSG 


0 


IS THE MASTER FINISHED? 


BNE 


1$ 


0 


•BRANCH IF NO 


MOV 


$$STP(RO).SP 


0 


RESET THE STACK 


JMP 


aRESTAB(RO) 






INC 


$EOPSG 






MOV 


#1. SYNC. 3 


;;ALLOU ANOTHER CPU IN 
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SEO 0075 



3303 


035410 


023737 


014134 


3304 


035416 


001374 




3305 


035420 


005237 
042737 


014344 


3306 


035424 


100000 


3307 


035432 


005327 




3308 


035434 


000001 




3309 


035436 


003402 




3310 


035440 


000137 


036122 


3311 


035444 


012737 




3312 


035446 


^ y^ *vyA 4 

000001 




3313 


035450 


035434 




3314 


035452 


104401 


035460 


3315 


035456 


ASNA / y\ 7 

000407 




3316 








77 4 7 

3317 


035476 






3318 


035476 


013746 


014344 


3319 








3320 


035502 


104405 




3321 


035504 


104401 


A7C ri 

035512 


3322 


A7f /» A f\ 

035510 


000421 




7 7 7 

3323 








3324 


035554 






77^r 

3325 


035554 


4 AC 777 

105737 


Ai y 777 

016737 


^ 7 — » y 

3326 


035560 


/\/\ 4 r" "\ / 

001524 




t 7 — » 7 

3327 


035562 


4 /W / A1 

104401 


Ai / 777 

014333 


3328 


035566 


104401 


A7f C 7/ 

035574 


77 ~m 

3329 


A7f r- -»-\ 

035572 


000404 




777A 

3330 








3331 


035604 






777 ^ 

3332 


y\7C y /a/ 

035604 


005003 




1777 

3333 


A7f / y 

035606 


t\t\i 777 

004737 


A7/ T7y 

036226 


77 7 / 

3334 


035612 


016346 


A1 / a/ 

014042 


777f 

3335 


A7f/ 4 y 

035616 


104405 




777y 

3336 


A7f y -*/■> 

035620 


4 /W / A4 

104401 


/\4 / 777 

014333 
0356 ' 


7 777 

3337 


A7 r* y / 

035624 


4 /\ / / A1 

104401 


7770 

3338 


A7 r* y 7/\ 

035630 


000404 




777/*\ 

3339 








77/ 

3340 


035642 






77 J 4 

3341 


a7C / / -* 

035642 


012703 


000001 


77/ 

3342 


035646 


AA / 777 

004737 


A7Z "7. •"> y 

036226 


77 1 7 

3343 


035652 


016346 


014042 


3344 


A7 I" y r* y 

035656 


4 / / /AC 

104405 




77 / C 

3345 


A7C / y /\ 

035660 


4 rt / / A1 

104401 


/\4 / 777 

014333 


77 / y 

3346 


035664 


104401 


A7C y 7"> 

035672 


77/ 7 

3347 


A7f / 7/\ 

035670 


y\/\/"\ / f\ 1 

000404 




77 y O 

3348 








77 y r\ 

3349 


A7f 7/\ 

035702 






77fA 

3350 


A7C 7/"\ 

035702 


012703 


000002 


77f 4 

3351 


A7r "»A/ 

035706 


r\r\i 777 

004737 


A7/ n/ 

036226 






U IOjhO 


ni /«/ 5 
U 1 '•U'tc 


3353 


035716 


104405 




3354 


035720 


104401 


014333 


3355 


035724 


104401 


035732 


3356 


035730 


000404 




3357 








3358 


035742 







5$: 



SE0PCT: 



1$: 

SENDCT: 



;;65$: 
64$: 



;;67$: 
66$: 



;;69$: 
68$: 



;;71$: 
70$: 



;;73$: 
72$: 



;;75$: 
74$: 



CMP 

8NE 

INC 

SIC 

DEC 

.WORD 

BLE 

JMP 

MOV 

.WORD 

$E0PCT 

TYPE 

BR 

.ASCIZ 

MOV 

TYPDS 

TYPE 

BR 

.ASCIZ 

TSTB 

BEG 

TYPE 

TYPE 

BR 

.ASCIZ 

CLR 

JSR 

MOV 

TYPDS 

TYPE 

TYPE 

BR 

.ASCIZ 

MOV 

JSR 

MOV 

TYPDS 

TYPE 

TYPE 

BR 

.ASCIZ 

MOV 

JSR 

MOV 

TYPDS 

TYPE 

TYPE 

BR 

.ASCIZ 



$E0PSG, CPUACT 
5$ 

$PASS 

#1 00000, $PASS 
(PC)* 
1 

1$ 

$D0AGN 
<PC) + .a(PO* 
1 

.65$ 
64$ 

<12><15>/END PASS 0/ 
$PASS,-(SP) 



INCREMENT THE PASS NUMBER 
DON'T ALlOW A NEG. NUMBER 
LOOP? 



;;YES 

.-.RESTORE COUNTER 



;;TYPE ASCIZ STRING 
;;GET OVER T HE ASCIZ 



.67$ 
66$ 



SAVE $PASS FOR TYPE OUT 
TYPE PASS NUMBER 
GO TYPE— DECIMAL ASCII WITH SIGN 
TYPE ASCIZ STRING 
GET OVER THE ASCIZ 



/ TOTAL ERRORS SINCE LAST REPORT / 



MPF 

UNIEOP 
.$CRLF 
.69$ 
68$ 

/CPU*0 /<76> 



;;TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 



R3 

PC.EOPLID 

$ERTTL(R3).-(SP) ;;SAVE $ERTTL (R3) FOR TYPE OUT 

;;G0 TYPE — DECIMAL ASCII WITH SIGN 

,$CRLF 

^71$ ;;TYPE ASCIZ STRING 

70$ ;;GET OVER THE ASCIZ 

/CPU#1 /<76> 

#1.R3 
PC.EOPLID 

$ERTTL(R3).-CSP) ;;SAVE $ERTTL(R3) FOR TYPE OUT 

;;G0 TYPE— DECIMAL ASCII WITH SIGN 

,$CRLF 

Jl% ;;TYPE ASCIZ STRING 

72$ ;;GET OVER THE ASCIZ 

/CPU#2 /<76> 

#2.R3 
PC.EOPLID 

$ERTTL(R3).-(SP) ;;SAVE $ERTTLCR3) FOR TYPEOUT 

;;G0 TYPE— DECIMAL ASCII WITH SIGN 

.$CRLF 

^75$ ;;TYPE ASCIZ STRING 

74$ ;;GET OVER THE ASCIZ 

/CPLW3 /<76> 
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3359 


035742 


012703 


000003 




MOV 


3360 


035746 


004737 


036226 




JSR 


3361 


035752 


016346 


014042 




MOV 


3362 


035756 


104405 






TVPDS 


3363 


035760 


104401 


014333 




TYPE 


3364 


035764 


104401 


035772 




TYPE 


3365 


035770 


000420 






BR 


3366 








hil 7S: 


.ASCI 


3367 


03603? 






76$: 




3368 


036032 






UNIEOP: 




3569 


036032 


013746 


014224 




MOV 


3370 


036036 


104405 






TYPDS 


3371 


036040 


104401 


014333 




TYPE 


3372 


036044 


005037 


014224 




CLR 


3373 


036050 


012703 


014042 




MOV 


3374 


036054 


005023 






CLR 


3375 


036056 


005023 






CLR 


3376 


036060 


005023 






CLR 


3377 


036062 


005023 






CLR 


3378 


036064 


005013 






CLR 


3379 


036066 


000400 






BR 


3380 


036070 


000404 




99$: 


BR 


3381 


036072 


01 3702 


000042 


$GET42: 


MOV 


^382 


036076 


001411 






BEQ 


3383 


036100 


000001 






WAIT 


3384 


036102 


013702 


000042 


$GET: 


MOV 


3385 


036106 


001405 






BEQ 


3386 


036110 


000005 






RESET 


3387 


036112 


004712 




JENDAD : 


JSR 


3388 


036114 


000240 






NOP 


3389 


036116 


000240 






NOP 


3390 


036120 


000240 






NOP 


3391 


036122 


013746 


014660 


$D0AGN: 


MOV 


3392 


036126 


013746 


014716 




MOV 


3393 


036132 


013746 


014720 




MOV 


3394 


036136 


013746 


016740 




MOV 


3395 


036142 


013746 


016774 




MOV 


3396 


036146 


013746 


016736 




MOV 


3397 


036152 


004737 


020000 




JSR 


3398 


036156 


012637 


016736 




MOV 


3399 


036162 


012637 


016774 




MOV 


3400 


036166 


012637 


016740 




MOV 


3401 


036172 


01 2637 


014720 




MOV 


3402 


036176 


012637 


014716 




MOV 


3403 


036202 


012637 


014660 




MOV 


3404 


036206 


005037 


014134 




CLR 


3405 


036212 


016006 


014200 




MOV 


3406 


036216 


000170 


037064 




JMP 


3407 


036222 


377 


377 


000 $ENULL : 


.BYTE 


34UO 










.EVEN 


3409 


036226 






EOPLID: 




3410 


036226 


005002 






CLR 


3411 


036230 


026203 


014226 


65$: 


CMP 


3412 


036234 


001404 






6E0 


3413 


036236 


005722 






TST 


3414 


036240 


020227 


000010 




CMP 
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SEQ 0076 



*3.R3 
PC. EOPLID 

$ERTTL(R3).-(SP) ;;SAVE $ERTTL(R3) FOR TYPE OUT 

;;G0 TYPE — DECIMAL ASCII WITH SIGN 

.$CRLF 

.77$ ;;TYPE ASCIZ STRING 

76$ ;;GET OVER THE ASCIZ 

/TOTAL SYSTEMWIDE ERROR COUNT = / 



$ERGBL.-(SP) 

,$CRLF 
$ERGBL 
*$ERTTL,R3 
(R3) + 
(R3) + 
(R3) + 
(R3) + 
(R3) 
99$ 
$GET 
a*42.R2 
$DOAGN 

a*42,R2 
$DQAGN 

PC.(R2) 



$PSWR, -(SP) 
TYPQUE. -(SP) 
TYPQUE +2, 
UBEF , -(SP) 
CPUACT, -(SP) 
FLAGS, -(SP) 



PC 

(SP)+. 
ISP)*. 
(SP)+, 
(SP)+, 
(SP)+. 
(SP)+, 
$EOPSG 
$$STP(RO).SP 
SRESTAB(RO) 
-1.-1.0 



;;SAVE $ERGBL FOR TYPE OUT 

;;G0 TYPE — DECIMAL ASCII WITH SIGN 



; CLEAR THE 

; ERROR TOTALS. 



.-SKIP OVER IN SUBROUTINE 

;;GET MONITOR ADDRESS 
; ; BRANCH IF NO MONITOR 



INSURE R2 CONTAINS THE MONITORS 

RETURN ADDRESS 

CLEAR THE WORLD 

GO TO MONITOR 

SAVE ROOM 

FOR 

ACT11 



-(SP) 



RESTRT 
FLAGS 
CPUACT 
UBEF 

TYPQUE +2 
TYPQUE 
$PSWR 



;; CLEAR THE COUNT AND FREE SLAVES 
; .-RESET THE STACK 

.•RETURN 
;;NULL CHARACTER STRING 



R2 

$CPUID(R2).R3 
64$ 
(R2) + 
R2.#10 



.RESET FOR COUNT 
;SID MATCH? 

; INCREMENT R2 BY I 
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SEO 0077 



5415 

5416 

54V 

5418 

5419 

5420 

5421 

5422 

5423 

5424 

5425 

5426 

5427 

3428 

5429 

5450 

5431 

5432 

5433 

5454 

5435 

5436 

5437 

5458 

5439 

5440 

5441 

5442 

3443 

5444 

5445 

5446 

5447 

5448 

5449 

5450 

5451 

5452 

54 53 

5454 

5455 

5456 

5457 

5458 

5459 

5460 

5461 

5462 

5463 

5464 

5465 

5466 

3467 

5468 

5469 

5470 



056244 
036246 
036250 



002771 
010203 
000207 



036252 
056252 
036260 



032770 
001056 



036262 000416 



036264 
036270 
036276 
036302 
036306 
036310 
036312 
036316 
036320 
036320 
036324 
036326 
036334 
036336 
036342 
036350 
036352 
036356 
036362 
036364 
036366 
036374 
036374 
036400 
036404 
036410 
036416 
056424 
036430 



013746 
012737 
005737 
012637 
000423 
022626 
012637 
000411 

105761 
001414 
032770 
001002 
000160 
013760 
000422 
105061 
105261 
005710 
001003 
116137 

011660 
011660 
005060 
112737 
113771 
016016 
000002 



040000 014160 



000004 
036310 
177060 
000004 



000004 

014006 

001000 

036352 
014032 

014006 
014002 



000004 



014160 
014022 



014002 014342 



014022 
014032 
014322 
000001 
014002 
014022 



014060 
014170 



64$: 



BLT 
MOV 
RTS 



65$ 

R2.R3 

PC 



;MOV LOGICAL ID TO 2ND OPERAND 



. S8TTL SCOPE HANDLER ROUTINE 

;****»***************•**•****************•********•*•*********** 

•THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 

♦AND LOAD THE TEST NUMBER (STSTNM) INTO THE DIS°LAY REG. (DISPLAY<7:0» 

*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

»SW14=1 LOOP ON TEST 

*SW09=1 LOOP ON ERROR 

•CALL 

* SCOPF ;;SCOPE=IOT 



SSCOPE : 
1$: BIT 
BNE 

;M0MMSJART OF 
SXTSTR: BR 

MOV 
MOV 
TST 
MOV 
BR 

5$: CMP 
MOV 
BR 

6$:;***##END OF 



*8IT14.3SWR(R0) 
$0VER 
CODE FOR 
6$ 



a#ERRVEC.-(SP) 
*5S,a#ERRVEC 

an 77060 

(SP)+,a#ERRVEC 
SSVLAD 
(SPH.(SP) + 
(SP)*.a#ERRVEC 
7$ 



;;LOOP ON PRESENT TEST? 
;;YES IF SW14=1 
THE XOR TESTERMMMW 

IF RUNNING ON THE "XOR" TESTER CHANGE 
THIS INSTRUCTION TO A 'MOP" (N0P=240) 
SAVE THE CONTENTS OF THE ERROR VECTOR 
SET FOR TIMEOUT 
TIME OUT ON XOR? 
RE MORE THE ERROR VECTOR 
GO TO THE NEXT TEST 
C EAR THE STACK AFTER A TIME OUT 
RESTORE THE ERROR VECTOR 
LOOP ON THE PRESENT TEST 



2$: TSTB 
BEO 
BIT 
BNE 
JMP 

7$: MOV 
BR 

4$: CLR8 
SSVLAD: INC8 
TST 
BNE 
MOVB 

1$: 

MOV 
MOV 
CLR 
MOVB 
fOVER: MOVB 
MOV 
RTI 



CODE FOR THE XOR TESTER##### 



$ERFLG(R1) 
SSVLAD 

«BIT09,aSWR(R0) 
7S 

4S(R0) 
SLPERR.SLPADRCRO) 
SOVER 
SERFLG(RI) 
STSTNMCRD 
(RO) 
IS 

$TSTNM(R1 ) .STESTN 



HAS AN ERROR OCCURRED? 

BR IF NO 

LOOP ON ERROR? 

BR IF NO 

;;SET LOOP ADDRESS TO LAST SCOPE 

ZERO THE ERROR FLAG 
COUNT TEST NUMBERS 
IS THIS THE MASTER 
NO, 

;;SET TEST NUMBER IN APT MAILBOX 



<SP). SLPADR(RO) 
(SP).SLPERR(RO) 
SESCAPE(RO) 
#1.$ERMAX 



.-SAVE SCOPE LOOP ADDRESS 
; SAVE ERROR LOOP ADDRESS 
.•CLEAR THE ESCAPE FROM ERROR ADDRESS 
. ;ONLY ALLOW 0NE(1) ERROR ON NEXT TEST 
STSTNM.aOl SPLAY (R1) .-.-DISPLAY TEST NUMBER 
$LPADR(RO).(SP) ;; FUDGE RETURN ADDRESS 
.-.-FIXES PS 
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SEQ 0078 



3471 

34 72 

3473 

34 74 

3475 

3476 

3477 

3478 

3479 

3480 

3481 

3482 

3463 

3484 

348S 

3486 

3487 

3488 

3489 

3490 

3491 

3492 

3493 

3494 

3495 

3496 

3497 

3498 

3499 

3500 

3501 

3502 

3503 

3504 

3505 

3506 

3507 

3508 

3509 

3510 

3511 

3512 

3513 

3514 

3515 

3516 

3517 

3518 

3519 

3520 

3521 

3522 

3523 

3524 

3525 

3S26 



036432 
036432 
036436 
036440 
036446 
036452 
036456 
036462 
036470 
036476 
036502 
036506 
036510 
036512 
036514 
036520 
036522 
036530 
036536 
036544 
036552 

036560 
036560 
036562 
036564 



0^o60C 
036604 
036606 

036612 
036612 
036620 
036622 
036630 
036634 
036635 
036636 
036640 
036640 



105261 
001775 
116170 
005260 
005237 
011660 
162760 
117061 
010660 
005770 
100025 
005700 
001022 
104401 
000417 
005015 
047440 
052123 
020116 
051117 
036560 

000000 
000413 
032770 
001402 
016016 
005760 
001402 
016016 



122737 
001007 
116137 
004737 
000 
000 
000777 



014006 

014002 
014042 
014224 
014064 
000002 
014064 
0140 7 4 
014160 



036522 

040510 
020116 
051105 
042444 
005015 



014170 



014064 
014054 



052114 
040515 
044440 
051122 
000 



001000 014160 

014032 
014322 



014322 



000001 

014054 
037112 



014356 
036634 



.S8TTL ERROR HANDLER ROUTINE 

; A********************************** ******** ********** ********** 

•THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT , 
*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS Of THE ERROR CALl 
•MADE BY THE FAILING PROCESSOR 

•AND TYPE OUT THE PROCESSOR ID AND PC OF THE ERROR INSTRUCTION 
•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 



*SW15=1 
*SW09=1 
•CALL 



$ERROR: 
7$: 



022737 036112 000042 



70$: 



75$: 
3$: 
10$: 
4$: 



5$: 



6$: 



21$: 

22$: 
11$: 



INC8 

BEQ 

M0V8 

INC 

INC 

MOV 

SUB 

M0V8 

MOV 

TST 

BPL 

TST 

BNE 

TYPE 

BR 

.ASCIZ 



.EVEN 



HALT 

BR 

BIT 

BEQ 

MOV 

TST 

BEO 

MOV 



CMP8 

BNE 

M0V8 

JSR 

.BYTE 

.BYTE 

BR 

CMP 



HALT ON ERROR 
LOOP ON ERROR 



ERROR N 



;;ERROR=EMT AND N=ERROR ITEM NUMBER 



$ERFLG(R1) ;;SET THE ERROR FLAG 

7$ ; ;DON'T LET THE FLAG GO TO ZERO 

$TSTNM(R1),aDISPLAY(R0) ;;DISPLAY TEST NUMBER 

$ERTTL(RO) ;;INC THE ERROR COUNT 

$ERGBL 

(SP).$ERRPC(RO) ;;GET ADDRESS OF ERROR INSTRUCTION 
*2.$ERRPC(R0) 

a$ERRPC(R0),$ITEMB(R1) ;; STRIP AND SAVE THE ERROR ITEM CODE 

SP.$ERRSP(RO) ;;SAVE THE CURRENT STACK POINTER 

aS«JR(RO) ; ; HAL T ON ERROR? 

10$ ;;SKIP IF CONTINUE 

RO ;;IS THIS THE MASTER? 

3$ ;;N0 

,70$ ;;TYPE ASCIZ STRING 

75$ ;;GET OVER THE ASCIZ 

<15><12>/HALT ON MASTER IN $ERR0R/<1 5><1 2> 



6$ 

#8IT9,aSUR(R0) 
5$ 

$LPERR(RO).'SP) 
$ESCAPE(RO) 
6$ 



;;N0 LOOP ON ERROR 

;;LOOP ON ERROR SWITCH SET? 

* 'BR IF NO 

••FUDGE RETURN ADDRESS 
;; CHECK FOR AN ESCAPE ADDRESS 
;;8R IF NONE 



$ESCAP£(RO),(SP)';; FUDGE RETURN ADDRESS FOR ESCAPE 



*APTENV,$ENV 
11$ 

$ITEMB(R1),21$ 
PC.$ATY4 

0 
0 

22$ 



; .'RUNNING IN APT MODE 

;; NO, SKIP APT ERROR REPORT 

;;SET ITEM NUMBER AS ERROR NUMBER 

;. -REPORT FATAL ERROR TO APT 



;;APT ERROR LOOP 



#$ENDAD,3#42 ;;ACT-11 AUTO-ACCEPT? 
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3527 


036646 


001001 








BNE 


3528 


036650 


000000 








HALT 


3529 


036652 








12$: 




3530 


036652 








SERRTYP 




3531 














3532 


036652 


106237 


01 7002 




64$: 


ASR8 


3533 


036656 


103375 








BCC 


3534 


036660 


010037 


0V064 






MOV 


3535 


036664 


005060 


017012 






CLR 


3536 


036670 


116105 


014054 






M0V8 


3537 


036674 


072527 


000003 






ASH 


3538 


036700 


162705 


000010 






sue 


3539 


036704 


062705 


017070 






ADD 


3540 


036710 


011537 


036716 






MOV 


3541 


036714 


1044J1 








TYPE 


3542 


036716 


000000 






1$: 


.WORD 


3543 


036720 


104401 


014333 






TYPE 


3544 


036724 


005725 








T ST 


3545 


036726 


005715 








TST 


3546 


036730 


001406 








BEO 


3547 


036732 


011537 


036740 






MOV 


3548 


036736 


104401 








TYPE 


3549 


036740 


000000 
104401 
005725 






2$: 


.WORD 


5550 


036742 


014333 






TYPE 


3551 


036746 






10$: 


TST 


3552 


036750 


005715 








TST 


3553 


036752 


001433 








BEQ 


3554 


036754 


011505 








MOV 


3555 


036756 


005715 






15$: 


TST 


3556 


036760 


001430 








BEQ 


3557 


036762 


000240 








NOP 


3558 


036764 


011337 


014524 






MOV 


3559 


036770 


022527 


014002 






CMP 


3560 


036774 


00H05 








BEQ 


3561 


036776 


060037 


014524 






ADD 


3562 


037002 


01 7746 


155516 






MOV 


3563 


037006 


000405 








BR 


3564 


037010 


005046 






16$: 


CLR 


3565 


037012 


060137 


014524 






ADD 


3566 


037016 


117716 


155502 






MOVB 


3567 


037022 


104402 






17$: 


TYPOC 


3568 


037024 


000240 








NOP 


3569 


037026 


104401 


037034 






TYPE 


3570 


037032 


000402 








BR 


35/1 










;;66$: 


.ASCIZ 


3572 


037040 








65$: 




3573 


037040 


000746 








BR 


3574 


037042 


104401 


014333 




20$: 


TYPE 


3575 


037046 


012737 


1 77777 


01 7064 




MOV 


3576 


037054 


012737 


000001 


01 7002 




MOV 


3577 














3578 


037062 


000002 








RTI 


3579 


037064 


021450 






RE STAB. ■ 


TST1 


3580 


037066 


021450 








TST1 


3581 


037070 


021450 








TST1 


3582 


037072 


021 A 50 








TST1 



B 7 
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SEO 0079 



;; BRANCH IF NO 

;;YES 



ERRLCr 
64$ 

RO. TYPLCK 
NOPRMP(RO) 
$ITEMB(R1).R5 
*Z. R5 
#10, R5 
#$ERRTB.R5 
(R5) .1$ 

0 

.$CRLF 

(R5) + 

(R5) 

10$ 

(R5).2$ 
0 

.$CRLF 
(R5)* 
(R5) 
20$ 

(R5),R5 

(R5) 

20$ 



.•ALLOW THIS CPU TO ENTER TYPE ROUTINE 
; ; PRINT MESSAGES WITH PROMPTS 
;;GET THE ERROR ITEM CODE 



ADD THE ADDR. OF THE ERROR TABLE 

SET UP TO... 

TYPE THE ERROR HEADER 



(R5). 

<R5)+. 

16$ 

RO. 

3YYY. 

17$ 

-<SP) 

R1. 

3YYY, 



YYY 

#$TSTNM 

YYY 
-(SP) 



YYY 
(SP) 



INCRE.1CNT R5 BY 2 

IS THERE A DATA HEADER? 

BRANCH IF NO 



;; INCREMENT R5 

;;IS THERE DATA TO BE TYPED? 

;;GET THE DATA TABLE ADDRESS 

; ; ARE WE AT THE END OF THt DATA TABLE? 

; .BRANCH IF YES 

;POINT TO THE LOCATION WITH THE NUMBER 



.66$ 
65$ 

/ / 



.-.TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 



15$ 
,$CRLF 

#-1. TYPLCK .-ALLOW ENTRY INTO TYPE ROUTINE 
#1 .ERRLCK 

- * RE TURN 

;END OF PASS RETURN 



J 
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3*83 
3584 
3585 
3586 
3587 
3588 
3589 
3590 
3591 
3592 
3593 
3594 

3595 037074 112737 000001 037340 $ATV1 

3596 037102 112737 000001 03^336 SATY3: 
3597 

3598 037112 112737 000001 037340 SATV4; 

3599 037120 $ATYC : 
3600 
3601 
3602 
3603 

3604 037132 122737 000001 014356 
3605 

3606 037142 132737 000100 014357 
3607 
3608 

3609 037156 062766 000002 000004 

3610 037164 005737 014336 1$: 
3611 
3612 

3613 037176 105720 2$: 
3614 
3615 
3616 
3617 
3618 
3619 
3620 
3621 
3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3630 
3631 

3632 037274 017637 000004 014340 

3633 037302 062766 000002 000004 
3634 
3635 
3636 
3637 
3638 
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SEO 0080 



037074 
037102 
037110 
037112 
037120 
037120 
037122 
037124 
037130 
037132 
037140 
037142 
037150 
037152 
037156 
037164 
037170 
037172 
037176 
037200 
037202 
037206 
037210 
037214 
037222 
037224 
037232 
037240 
037244 
037250 
037252 
037252 
037256 
037260 
037264 
037266 
037272 
037274 
037302 
037310 
037314 
037320 
037324 
037330 



112737 
112737 
000403 
112737 

010046 
010146 
105737 
001450 
122737 
001031 
132737 
001425 
017600 
062766 
005737 
001375 
010037 
105720 
001376 
163700 
006200 
010037 
012737 
000413 
017637 
062766 
013746 
004737 
000000 

105737 
001416 
005737 
001413 
005737 
001375 
017637 
062766 
005237 
105037 
105037 
105037 
012601 



.S8TTL APT COMMUNICATIONS ROUTINE 

•• *************************************************************** 



037336 

000001 

000100 

000004 
000002 
014336 

014352 

014352 

014354 
000004 

000004 
000002 
1 77776 
040072 

037340 

014356 

014336 

000004 
000002 
014336 
037340 
037337 
037336 



014336 

037250 
000004 



3$: 



4$: 
5$: 
10$: 



11$: 



12$: 



M0V8 
M0V8 
BR 
M0V8 

MOV 

MOV 

TST8 

BEG 

CMP8 

BNE 

BI T8 

BZQ 

MOV 

ADD 

TST 

BNE 

MOV 

TST8 

BNE 

SUB 

ASR 

MOV 

MOV 

BR 

MOV 

ADD 

MOV 

JSR 

.WORD 

TSTB 

BEQ 

TST 

BEQ 

TST 

BNE 

MOV 

ADD 

INC 

CLR8 

CLR8 

CLRB 

MOV 



n.$FFLG 
#1.$MF|_G 
$ATYC 
#1,$FFLG 

RO.-(SP) 
R1.-(SP) 
SMfLG 
5$ 

#APTENV,$ENV 
3$ 

#APTSP0OL,$ENVM 
3$ 

34(SP).R0 
#2,4(SP> 
$MSGTYPE 
1$ 

R0.$MSGAD 
(RO)* 
2$ 

$MSGAD,RO 
RO 

RO.$MSGLGT 
#4.$MSGTYPE 
5$ 

94<SP),4$ 
#2.4 (SP) 
1 7777b. -(SP) 
PC.$TYPE 

0 

$Ff LG 
12$ 
$ENV 
12$ 

SMSGTYPE 
11$ 

94(SP).$FATAL 
#2.4(SP> 
$MSGTYPE 
$FFLG 
$LFLG 
$MFLG 
(SP)+,R1 



;;T0 REPORT FATAL ERROR 
;;T0 TYPE A MESSAGE 

;;T0 ONLY REPORT FATAL ERROR 

.•PUSH RO ON STACK 
.-PUSH R1 ON STACK 
.'SHOULD TYPE A MESSAGE? 
'IF NOT: BR 
; OPERATING UNDER APT? 
;Jf NOT: BR 
.•SHOULD SPOOL MESSAGES? 
;IF NOT: BR 
;GET MESSAGE ADDR. 

;;8UMP RETURN ADDR. 
;SEE IF DONE W/ LAST XMISSION? 
;IF NOT: WAJT 
;PUT ADDR IN MAILBOX 
.-FIND END OF MESSAGE 

.SUB START OF MESSAGE 
.GET MESSAGE LNGTH IN WORDS 
;PUT LENGTH IN MAILBOX 
; TELL APT TO TAKE MSG. 

;;PUT MSG ADDR IN JSR LINKAGE 
••BUMP RETURN ADDRESS 
;;PUSH 177776 ON STACK 
;;CALL TYPE MACRO 



SHOULD REPORT FATAL ERROR 7 
IF NOT: BR 
RUNNING UNDER APT 1 
IF NOT: BR 

FINISHED LAST MESSAGE 7 
If NOT: WAIT 
GET ERROR # 

;;8UMP RETURN ADDR. 
TELL APT TO TAKE ERROR 
CLEAR FATAL FLAG 
CLEAR LOG FLAG 
CLEAR MESSAGE FLAG 
POP STACK INTO R1 
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3639 

3640 

3641 

3642 

3643 

3644 

3645 

3646 

3647 

3648 

3649 

3650 

3651 

365? 

3653 

3654 

3655 

3656 

3657 

3658 

3659 

3660 

3661 

3662 

3663 

3664 

3665 

3666 

3667 

3668 

3669 

3670 

3671 

3672 

3673 

3674 

3675 

3676 

3677 

3678 

3679 

3680 

3681 

3682 

3683 

3684 

3685 

3686 

3687 

3688 

3689 

3690 

3691 

3692 

3693 

3694 



037332 
037334 
037336 
037337 
037340 



037342 
037346 
037354 
037360 
037364 
037366 
037374 
037402 
037410 
037412 
037414 
037416 
037424 
037430 
037436 
037444 
037452 



012600 
000207 
000 
000 
000 
037342 
000200 
000001 
000100 
000040 



017646 
116637 
112637 
062716 
000406 
112737 
112737 
112737 
010346 
010446 
010546 
113737 
005437 
062737 
113737 
113737 
016605 



000000 
000001 
037637 
000002 

000001 
000006 
000005 



037637 
037640 
000006 
037640 
037635 
000012 



037635 



037635 
037637 
037634 



037640 

037640 
037636 
037640 



(SP; *.R0 

PC 

0 

0 

0 



MOV 

RTS 

SMFLG: .BYTE 
SLFLG: -8YTE 
SFFLG: .SYTE 
.EVEN 
APTSIZE=200 
APTENV=001 
APTSPOOL-100 
APTCSUP=040 



.S8TTL BINARY TO OCTAL (ASCII > AND TYPE 
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POP STACK INTO RO 
RETURN 
MESSG. FLAG 
LOG FLAG 
FATAL FLAG 



SEQ 0081 



;******»****************************«**«**»»»*»»..».»»♦«««,*»»»« 

•THIS ROUTINE IS USED TO CHANGE A 16HBIT BINARY NUMBER TO A 6-DIGIT 
•OCTAL (ASCII) NUMBER AND TYPE IT. 

•STYPOS ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 

•CALL: 



MOV 
TYPOS 
.BYTE 
• BYTE 



NUM.-(SP) 



N 
M 



NUMBER TO BE TYPED 
CALL FOR TYPEOUT 

N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 

M=1 OR 0 

;;1=TYPE LEADING ZEROS 
;;0=SUPPRESS LEADING ZEROS 



* 
* 
* 
* 

* 

• % 

•STYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

•STYPOS OR STYPOC 

•CALL: 

• MOV NUM.-(SP) ; .-NUMBER TO BE TYPED 

• TYPON ;;CALL FOR TYPEOUT 



♦STYPOC ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 

•CALL: 

• MOV NUM.-(SP) ; .-NUMBER TO BE TYPED 

• TYPOC ;;CALL FOR TYPEOUT 



$ TYPOS: MOV 
MOVB 
M0V8 
ADD 
BR 

STYPOC: MOVB 
MOVB 

STYPON: MOVB 
MOV 
MOV 
MOV 
MOVB 
NEG 
ADD 
MOVB 
MOVB 
MOV 



a(SP),-(SP) 

1(SP),$0FILL 

(SP)*,$CM0DE*1 

*2.(SP> 

STYPON 

*1.$0FILL 

#6,S0M0DE*1 

#5.S0CNT 

R3.-(SP> 

R4,-(SP) 

R5,-(SP> 

SOMODE+1 .DIGITS 

DIGITS 

*6.DIGITS 

DIGITS. SOMODE 

SOFILL. DIGITS 

12(SP).R5 



; PICKUP THE MODE 
.-LOAD ZERO FILL SWITCH 
.•NUMBER Of DIGITS TO TYPE 
.-ADJUST RETURN ADDRESS 

.-SET THE ZERO FILL SWITCH 
.SET FOR SIX(6) DIGITS 
.-SET THE ITERATION COUNT 
; SAVE R3 
; SAVE R4 
'SAVE R5 

;GET THE NUMBER OF DIGITS TO TYPE 



; .-SUBTRACT IT FOR MAX. 
SAVE IT FOR USE 
GET THE ZERO FILL SWITCH 
PICKUP THE INPUT NUMBER 



ALLOWED 
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3695 

3696 

3697 

3698 

3699 

3700 

3701 

370? 

3703 

3704 

3705 

3706 

3707 

3708 

3709 

3710 

3711 

3712 

3713 

37H 

371 S 

3716 

3717 

3718 

3719 

3720 

3721 

3722 

3723 

3724 

3725 

3726 

3727 

3728 

3729 

3730 

3731 

3732 

3733 

3734 

3735 

3736 

3737 

3738 

3739 

3740 

3741 

3742 

3743 

3744 

3745 

3746 

3747 

3748 

3749 

3750 



037456 
037460 
037462 
037464 
037466 
037470 
G37472 
037474 
037476 
037502 
037504 
037510 
037512 
037516 
037520 
037524 
037530 
037534 
037540 
037542 
037544 
037546 
037550 
037556 
037564 
037566 
037574 
037600 
037602 
037604 
037610 
037612 
037614 
037616 
037620 
037626 
037630 
037632 
037633 
037634 
037635 
037636 
037640 



005003 
006105 
000404 
006105 
006105 
006105 
010503 
006103 
105337 
100034 
042703 
001003 
005737 
001404 
005237 
052703 
052703 
01 3704 
110324 
105014 
104401 
047266 
062737 
023727 
002403 
012737 
105337 
003331 
002403 
005237 
000725 
012605 
012604 
012603 
016666 
012616 
000002 
000 
000 
000 
000 
000000 
000000 



PDP-11/70 SYSTEM POWER 


FAIL 


E 7 

MAC Y1 1 30A(1052) 


13-MAR-80 16:04 PAGE 70 


16:04 




BINARY 


TO OCTAL 


(ASCII) AND TYPE 










CLR 


R3 


; CLEAR THE OUTPUT WORD 






!$: 


ROL 


R5 


.ROTATE MSB INTO C 








BR 


3S 


;G0 DO MSB 






2$: 


ROL 


R5 


;F0RM THli DIGIT 








ROL 


R5 










ROL 


R5 










MOV 


R5.R3 








3$: 


ROL 


rv T 

R3 


;GET LS8 OF THIS DIGIT 


037636 






DECB 


SOMODE 


;TYPE THIS DIGIT? 








BPL 


7$ 


t p" ft ia 

;BR IF NO 


1 77770 






BIC 


0177770, R3 


;GET RID OF JUNK 








BNE 


4» 


;TEST FOR 0 


037640 






TST 


DIGITS 


.•SUPPRESS THIS 0? 








BEQ 


5» 


;8R IF YES 


037640 




4S: 


INC 


DIGITS 


. DON T SUPPRESS ANYMORE OS 


000060 






BIS 


# 0.R3 


AA Al/T Ti i t f PV T P~ T T ft f /~ T T 

;MAKE THIS DIGIT ASCII 


00C040 




5$: 


BIS 


At ■ n ? 

* ,R3 


;MAKE ASCII IF NOT ALREADY 


037546 






MOV 


9S. R4 


;P0INT TO ERRBUF TABLE 








M0V8 


P\ T t T\ / \ i 

R3 , ( P4 ) + 


;PUT THE CHARACTER IN THE TABLE 








CLR8 


(R4) 


AA » l/T IT A AA Tut A f f t t ftaflf /* 

;MAKE IT A MINI -ASCI I MSG 








TYPE 




;G0 TO JTYPt 






9$: 


ERRBUF 




;HERE IS THE LOCATION OF MSG 


000002 


037546 




ADD 


ft* rt* 

*2. 9$ 


;M0VE TO NEXT TABLE L0C 


037546 


111266 




CMP 


9$, #END 


;AT THE END OF ALLOWED BUF AREA? 








BLT 


r * 


. ^\ F\ ft ft i a ■ v#* ft 

.'BRANCH IF NO 


047266 


037546 




MOV 


♦ERRBUF , 9$ 


.-ELSE POINT TO BEGINNING AGAIN 


037634 




7%: 


DECB 


$0CNT 


; COUNT BY 1 








f»P> T 

BGT 


2$ 


;BR IF MORE TO DO 








BLT 


6$ 


;8R IF DONE 


037640 






INC 


DIGITS 


- iiipi BT*r" i ACT fv i r t ? i ml t a m a a us 

.INSURE LAST DIGIT ISN T A BLANK 








BR 


2$ 


;G0 DO THE LAST DIoIT 






6$: 


MOV 


(SP) +.R5 


.•RESTORE R5 








MOV 


(SP) + ,R4 


nPPTAPiP r%i 

.•RESTORE R4 








MOV 


(SP) *.R3 


nrPTnnp nT 

.•RESTORE R3 


000002 


000004 




MOV 


2(SP;.4(SP) 


.SET THE STACK FOR RETURNING 








MOV 


t c r> \ . / p p» \ 

(SP)*, (SP) 










RTI 




; RETURN 






8$: 


•BYTE 


0 


.•STORAGE FOR ASCII DIGIT 








.BYTE 


0 


vrPtil 1 Al A T*"v^» r- f\p\ t unT f~»/-^ i T T » if 

.•TERMINATOR FOR TYPE ROUTINE 






SOCNT : 


n w tp 

.BYTE 


0 


.rtPTii MP f T PPM klTFA 

;0CTAL DIGIT COUNTER 






SOFILL: 


.BYTE 


0 


; ZERO FILL SWITCH 






SOMODE: 


.WORD 


0 


.•NUMBER OF DIGITS TO TYPE 






DIGITS: 


.WORD 


0 








.S8TTL 


CONVERT 


BINARY TO DECIMAL 


AND TYPE ROUTINE 



E0 008^- 



•THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGT 
•SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
•NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
•BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYi BE 
•REPLACED WITH SPACES. 
•CALL: 



MAINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 

CEKBGC.P11 13-MAR-80 16:04 CONVERT BINARY 

3751 MOV 

3752 ;* TYPDS 
3753 

3754 037642 tTYPDS: 

3755 037642 010046 MOV 

3756 037644 010146 MOV 

3757 037646 010246 MOV 

3758 037650 010346 MOV 

3759 037652 010546 MOV 

3760 037654 012746 020200 MOV 

3761 037660 016605 000020 MOV 

3762 037664 100004 BPL 

3763 037666 005405 NEG 

3764 037670 112766 000055 000001 MOVB 

3765 037676 005000 1$: CLR 

3766 037700 012703 040062 MOV 

3767 037704 112723 000040 MOVB 

3768 037710 005002 2$: CLR 

3769 037712 016001 040052 MOV 

3770 037716 160105 3$: SUB 

3771 037720 002402 BLT 

3772 037722 005202 INC 

3773 037724 000774 BR 

3774 037726 060105 4$: ADD 

3775 037730 005702 TST 

3776 037732 001002 BNE 

3777 037734 105716 TSTB 

3778 037736 100407 BMI 

3779 037740 106316 5$: ASLB 

3780 037742 103003 BCC 

3781 037744 116663 000001 177777 MOVB 

3782 037752 052702 000060 6$: BIS 

3783 037756 052702 000040 7$: BIS 

3784 037762 110223 MOVB 

3785 037764 005720 TST 

3786 037766 020027 000010 CMP 

3787 037772 002746 BLT 

3788 037774 003002 BGT 

3789 037776 010502 MOV 

3790 040000 000764 BR 

3791 040002 105726 8$: TSTB 

3792 040004 100003 BPL 

3793 040006 116663 1 77777 177776 MOVB 

3794 040014 105013 9$: CLR8 

3795 040016 012605 MOV 

3796 040020 012603 MOV 

3797 040022 012602 MOV 

3798 040024 012601 MOV 

3799 040026 012600 MOV 

3800 040030 000240 NOP 

3801 040032 104401 040062 TYPE 

3802 040036 000240 NOP 

3803 040040 016666 000002 000004 MOV 

3804 040046 012616 MOV 

3805 040050 000002 RTI 

3806 040052 023420 SDTBL: 10000. 
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TO DECIMAL AND TYPE ROUTINE 0 0083 



NUM.-(SP) ;;PUT THE BINARY NUMBER ON THE SMC* 

;;G0 TO THE ROUTINE 



RO.-(SP) ;;PUSH RO ON STACK 

R1,-(SP) ;;PUSH R1 ON STACK 

R2,-(SP) ;;PUSH R2 ON STACK 

R3.-CSP) ;;PUSH R3 ON STACK 

R5,-(SP) ;;PUSH R5 ON STACK 

#20200. -(SP) ;;SET BLANK SWITCH AND SIGN 

20(SP).R5 ;;GET THE INPUT NUMBER 

1$ ;;8R IF INPUT IS POS. 

R5 ; ;MAKE THE BINARY NUMBER POS. 

*'-.KSP) ;;MAKE THE ASCII NUMBER NEG. 

RO ;;ZER0 THE CONSTANTS INDEX 

#$DBLK,R3 ; .-SETUP THE OUTPUT POINTER 

K' .(R3)* ;;SET THE FIRST CHARACTER TO A BLANK 

R2 ;; CLEAR THE BCD NUMBER 

SDTBL (RO) ,R1 ;;GET THE CONSTANT 

R1.R5 ;;FORM THIS BCD DIGIT 

4$ ;;8R IF DONE 

R2 ;; INCREASE THE BCD DIGIT BY 1 

3$ 

R1.R5 ;;ADD BACK THE CONSTANT 

R2 ;; CHECK IF BCD DIGIT=0 

5$ ; ;FALL THROUGH IF 0 

(SP) ; ;STILL DOING LEADING O'S? 

7$ ;;BR IF YES 

(SP) ;;MSD? 

6$ ;;BR IF NO 

1(SP).-1(R3) ;; YES— SET THE SIGN 

#'0.R2 ;;MAKE THE BCD DIGIT ASCII 

#' ,R2 ; .-MAKE IT A SPACE IF NOT ALREADY A DIGIT 

R2.(R3)* ;;PUT THIS CHARACTER IN THE OUTPUT BUFFER 

(RO)* ;;JUST INCREMENTING 

R0.#10 ;; CHECK THE TABLE INDEX 

2$ ;;G0 DO THE NEXT DIGIT 

8$ ;;G0 TO EXIT 

R5.R2 ;.GET THE LSD 

6$ ;;G0 CHANGE TO ASCII 

(SP)* ;;UAS THE LSD THE FIRST NON-ZERO"* 

9$ * "BR IF NO 

-1(SP).-2(R3) ;; YES— SET THE SIGN FOR TYPING 

(R3) ;;SET THE TERMINATOR 

(SP)*.R5 ; ;POP STACK INTO R5 

<SP)*.R3 ;;POP STACK INTO R3 

(SP)*.R2 ; ."POP STACK INTO R2 

(SP)*,R1 ; ;POP STACK INTO R1 

(SP)*.RO ;;POP STACK INTO RO 

.SDBLK ;;NOW TYPE THE NUMBER 

2(SP).4(SP) ; .-ADJUST THE STACK 
<SP)*.(SP> 

;; RE TURN TO USER 
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CEKSGC.P1 1 13-MAR-80 16:04 CONVERT BINARY 



G 7 

MACY11 30A(1052) 13-MAR-80 
TO DECIMAL AND TYPE ROUTINE 



16:04 PAGE 72 



SEO 008a 



3807 


040054 


001750 




3808 


040056 


000144 




3809 


040060 


000012 




3810 


040062 


000004 




3811 








3812 








3813 








38H 








3815 








3816 


040072 






3817 


040072 


132737 


000040 


3818 


040100 


001403 




3819 


040102 


062716 


000002 


3820 


040106 


000002 




3821 


040110 






3822 


040110 


005737 


017002 


3823 


040114 


001003 


3824 


040116 


020037 


01 7064 


3825 


040122 


001363 




3826 


040124 


010246 




3827 


040126 


010346 




3828 


040130 


010446 




3829 


040132 


010546 




3830 


040134 


105737 


016737 


3831 


040140 


001003 




3832 


040142 


012704 


000400 


3833 


040146 


000414 




3834 


040150 


017705 


1 56654 


3835 


040154 


072527 


1 77770 


3836 


040160 


010504 




3837 


040162 


016002 


01 701 2 


3838 


040166 


000302 




3839 


040170 


s\ r r\ y\ j 

050204 




3840 


040172 


012760 


000001 


3841 


040200 


106237 


017024 


3842 


040204 


103375 




3843 








3844 


040206 


01 3703 


014720 


3845 


040212 


005723 




3846 


040214 


010413 




3847 


040216 


010337 


014720 


3848 








3849 


040222 






3850 








3851 


040222 


013703 


014720 


3852 


040226 


005723 


3853 


040230 


016613 


000010 


3854 


040234 


010337 


014720 


3855 








far/ 


0*»U24U 


A4 Tit 1 

013345 




3857 


040242 


012737 


000001 


3858 


040250 


005700 




3859 


040252 


001407 




3860 


040254 


012605 




3861 


040256 


012604 




3862 


040260 


012603 





$D8LK: 



. S8TTL 
5TYPE: 



6$: 



3$: 



1$: 



2$: 

64$: 
4$: 

65$: 

5$: 



1000. 

100. 

10. 

.8LKW 4 



TYPE SERVICE 



81 T8 


#40. 


$ENVM 


BE0 


6$ 




ADD 


#2. 


(SP) 


RTJ 






TST 


ERRLCK 




BNE 


3$ 




CMP 


R0. 


TYPLCK 


BNE 


$TVPE 




nov 


R2. 


-(SP) 


MOV 


R3. 


-(SP) 


MOV 


R4. 


-(SP) 


MOV 


R5. 


-(SP) 


TST8 


MPF 




BNE 


1$ 




MOV 


#400. 


R4 


BR 


2$ 




MOV 


aACR. 


R5 


ASH 


#-10. 


R5 


MOV 


R5. 


R4 


MOV 


NOPRMP(R0).R2 


SWAB 


R2 




BIS 


R2.R4 




MOV 


#1. 


NOPRMP 


ASR8 


TQL1 




BCC 


2$ 





.•INHIBIT PRINT OUT? 
.■BRANCH If NO 
; SET RETURN 



IS A CPU IN THE ERROR ROUTINE? 
BRANCH IF NO 

IS THIS CPU FROM THE ERROR ROUTINE? 
BRANCH IF NO 

STORE REGISTERS USED IN THIS PROGRAM 



;D0NT TYPE A CPUID 

;PUT SELF ID INTO R5 

;PUT ID INTO R4 
;C0P>; THE PROMPT FLAG 
;GET IT INTO THE LEFT HALF 
;PUT IT IN R5 
JO) 

.-ENTER TYPOUE CRITICAL SECTION 



******** enquE 



MOV 
TST 
MOV 
MOV 



TYPOUE *2.R3 ;COPY REAR INDEX 
(R3)* ; INCREMENT BY 2 

R4.(R3) .-QUEUE THE ELEMENT 

R3. TYPOUE* 2 ; UPDATE THE REAR INDEX 
it*********************** 



;;**••••** ENQUE ***** 

MOV TYPQUE+2.R3 
TST (R3)* 
MOV 10(SP),(R3) 
MOV R3. TYPOUE *2 
• ********************* 



MOV 
MOV 
TST 
BEO 
MOV 
MOV 
MOV 



9(R3)*, -<R3) 
#1.TQL1 
RO 



11$ 

(SP)*. 
(SP)*. 
(SP)*. 



R5 
R4 
R3 



.COPY REAR INDEX 
; INCREMENT BY 2 
; QUEUE THE ELEMENT 
.•UPDATE THE REAR INDEX 
**** 

;GET PC OF MSG 
.•CLEAR CRITICAL SECTION 
;IS THIS THE MASTER? 
.•BRANCH IF YES. 
.RESTORE THE REGISTERS 
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MOV 
ADD 
RTI 



MAC Vl 1 



H 7 

30A(1052) 



3863 


040262 


012602 




3864 


040264 


062716 


000002 


3865 


040270 


000002 




3866 


040272 






3867 


040272 


106237 


01 7024 


3868 


040276 


103375 




3869 


040300 






3870 








3871 


040300 


023737 


014716 


3872 


040306 


001456 




3873 


040310 


013703 


0H716 


3874 


040314 


005723 




3875 


040316 


011304 




3876 


040320 


010337 


014716 


3877 








3878 


040324 


032704 


000400 


3879 


040330 


001025 




3880 


040332 


062704 


021060 


3881 


040336 


112702 


000015 


3882 


040342 


004737 


040504 


3883 


040346 


112702 


000012 


3884 


040352 


004737 


040504 


3885 


040356 


110402 




3886 


040360 


004737 


040504 


3887 


040364 


112702 


021076 


3888 


040370 


004737 


040504 


3889 


040374 


112702 


021040 


3890 


040400 


004737 


040504 


3891 


040404 






3892 








3893 


040404 


023737 


014716 


3894 


040412 


001414 




3895 


040414 


013703 


014716 


3896 


040420 


005723 




3897 


040422 


01 1 304 




3898 


040424 


010337 


014716 


3899 








3900 


040430 


112402 




3901 


040432 


005702 




3902 


040434 


001721 




3903 


040436 


004737 


040504 


3904 


040442 


000772 




3905 


040444 


012737 


014722 


3906 


040452 


012737 


014722 


3907 


040460 


012737 


000001 


3908 


040466 


012605 




3909 


040470 


012604 




3910 


040472 


012603 




3911 


040474 


012602 




3912 


040476 


062716 


000002 


3913 


040502 


000002 




3914 








3915 


040504 


105777 


153504 


3916 


040510 


100375 




3917 


040512 


110277 


153500 


3918 


040516 


000207 





10$: 
11$: 

HERE; 



12$: 



014716 
014720 
01 7024 



14$: 



13$: 



TYPJ T : 



ASR8 
BCC 



(SP)*, 
*2. 



TQL1 
11$ 



R2 
(SP) 
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.•RETURN 

; ENTER CRITICAL SECTOR 



SEC 0085 



DEQUE »»••*•••*• 

CMP T YPQUE. T YPQUE *2 ; ;ARE THE INDICIES EQUAL? 

BEQ 13$ ; ; YES. THE QUEUE IS EMPTY 

MOV TYPQJE.R3 --COPY FRONT INDEX INTO «3 

TST (R3)* ;;INC. R3 BY TWO 

MOV (R3).R4 ; .-DEQUEUE AN ELEMENT 

MOV R3.TYPQUE ; .-UPDATE FRONT INDEX 



BIT 

BNE 

ADD 

MOVB 

JSR 

MOVB 

JSR 

MOVB 

JSR 

MOVB 

JSR 

MOVB 

JSR 



*8IT8,R4 
12$ 

*' TT.R4 

*CR.R2 

PC.TYPIT 

*LF.R2 

PC.TYPIT 

R4.R2 

PC.TYPIT 

#'V '.R2 

PC.TYPIT 

",R2 
PC.TYPIT 



;WAS THE NOPRMP(RO) BIT SET** 

.-MAKE CPUID A CHARACTER 
;TYPE ft CARRAGE RETURN 
.-TYPE CRLF 

.-TYPE IT 
; CPU ID 

; ">'• 
.-TYPE IT 

.-TYPE A SPACE 



CMP 
BEQ 
MOV 
TST 
MOV 
MOV 
• • •** 

MOVB 

TST 

BEO 

JSR 

BR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

ADD 

RTI 

TSTB 
BPL 
MOVB 
RTS 



DEQUE •••••••••• 

T YPQUE , T YPQUE *2 ; ;ARE THE INDICIES EQUAL 1 
13$ ;; YES. THE OUEUE IS EMPTY 

TYPQUE.R3 ;;COPY FRONT INDEX INTO R3 

(R3)* ;.INC. R3 BY TWO 

(R3).R4 ; .DEQUEUE AN ELEMENT 
R3.TYPQUE ; .-UPDATE FRONT INDEX 

******************** 



<R4)+.R2 

R2 

HERE 

PC.TYPIT 
14$ 

ft J YPQUE *4. 
ftT YPQUE +4, 
*1. TQL1 
<SP)+, R5 
(SP)*. R4 
(SP>+. R3 
(SP)*. R2 
ft2. (SP) 



a$TPs 

TYPIT 

R2.S$TP3 

PC 



.-GET A CHARE CTER 

.•WE'RE DONE .R2 IS CLEAR 
;TYPE THE CHARECTER 
.-LOOP 
T YPQUE 
T YPQUE* 2 

* RE TURN 
.•RESTORE THE REGISTERS 



.-WAIT UNTIL PRINTER IS READY 
.-TYPE THE CHARACTER 

.■RETURN 
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3919 
3920 
3921 
3922 
3923 
3924 
3925 
3926 
3927 
3928 
3929 
3930 

3931 040520 
5932 040524 

3933 040526 

3934 040530 

3935 040532 

3936 040534 

3937 040540 

3938 040544 

3939 040550 
3940 
3941 
3942 
3943 
3944 

3945 040554 

3946 040556 

3947 040564 
3948 
3949 
3950 
3951 
3952 
3953 
3954 
3955 

3956 040566 

3957 040570 

3958 040572 

3959 040574 

3960 040576 

3961 040600 
3962 
3963 
3964 
3965 
3966 

3967 040606 

3968 040614 

3969 040620 

3970 040624 
3971 

3972 040630 

3973 040630 

3974 040636 



SYSTEM POWER FAIL MAC V 11 
TYPE SERVICE 



S8TTL TRAP DECODER 



I 7 

3OAU052) 
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SEO 0086 



; *I H i S ,59 U Ii N L WILL p lCKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
.••AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THESTARTI^ AIMRF^ 

}Z fg E THAT ] RC^TlSE! INE ' USIN6 THE ™^SS 08* AI NED I T^W^L L 



010260 014552 

011602 

005742 

111202 

006302 

016202 040566 
010260 014562 
016002 014552 
000170 014562 



011646 

016666 000004 
000002 



STRAP: 
1$: 



MOV 

MOV 

TST 

MOVB 

ASL 

MOV 

MOV 

MOV 

JMP 



R2, SAVRG(RO) 

<SP) f R2 ;;GET TRAP ADDRESS 

;; BACKUP Br 2 

."GET RIGHT BYTE OF TRAP 
;. -POSITION FOR INDEXING 
;; INDEX TO TABLE 



-(R2) 
(R2),R2 
R2 

STRPAD(R2),R2 
R2. ROUTE (RO) 
SAVRG(RO), R2 
afiOUTE(RO) 



;;THIS IS USE TO HANDLE THE ' "GETPRI" MACRO 



000002 



STRAP2: 



MOV 
MOV 
RTI 



(SP),-(SP) 
4(SP),2(SP) 



;;MOVE THE PC DOWN 
;;MOVE THE PSU DOWN 
; .-RESTORE THE PSW 



.S8TTL TRAP TABLE 



i^^THE^.U^KsTRuCTIW^ 7 ^ 6 ADDRESSES 0F THF ROUTINES CALLED 



ROUTINE 



040554 
040072 
037366 
037342 
037402 
037642 



040602 000170 014672 



$TRPAD: .WORD 
$TYPE 
STYPOC 
$ TYPOS 
STYPON 
STYPDS 



STRAP2 

;; CALL = TYPE 

;;CALL=TYPOC 

;;CALL= TYPOS 

;;CALL=TYPON 

;;CALL=TYPDS 



TRAP+1 (104401) 
TRAP*2( 104402) 
TRAP*3( 104403) 
TRAP*4( 104404) 
TRAP+5(104405) 



TTY TYPEOUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TYPE OCTAL NUMBER (NO LEADING ZEROS) 
TYPE OCTAL NUMBER (AS PER LAST CALL) 
TYPE DECIMAL NUMBER (WITH SIGN) 



ISTDJS: JMP aiSTTAB(RO) ;IIST INTERRUPT DISPATCHER 



012737 
005037 
000177 
000170 



\77777 
014602 
154036 
014702 



014602 PWRDIS: MOV 
CLR 
JMP 

ERRDIS: JMP 



*-1,FLAG 
FLAG 
SPWRTAB 
SERRTAB(RO) 



.-FIRST INSTRUCTION FLAG 
;NOW CLEAR IT 

;CPU ERROR DISPATCHER 



013760 
104005 



177766 014250 



CPUER : 



MOV 
ERROR 



a*CPUERR.$REG1(R0) 



;CPU ERROR REG. 
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3975 

3976 

3977 

3978 

3979 

3980 

3981 

3982 

3983 

3984 

3985 

3986 

3987 

3988 

3989 

3990 

3991 

3992 

3993 

3994 

3995 

3996 

3997 

3998 

3999 

4000 

4001 

4002 

4003 

4004 

4005 

4006 

4007 

4008 

4009 

4010 

4011 

4012 

4013 

4014 

4015 

4016 

4017 

4018 

4019 

4020 

4021 

4022 

4023 

4024 

4025 

4026 

4027 

4028 

4029 

4030 



040640 000000 
040642 000002 



040644 

040652 

040660 

040666 

040674 

040676 

040704 

040712 

040720 

040723 

040730 

040736 

040744 

040752 

040760 

040765 

040772 

041000 

041006 

041014 

041022 

041030 

041033 

041040 

041046 

041054 

041062 

041070 

041076 

041100 

041106 

041114 

041122 

041130 

041136 

041143 

041150 

041156 

041164 

041172 

041176 

041204 

041207 

041214 

041222 

041230 

041236 

041241 

041246 

041254 

041262 

041270 

041276 



005015 
026507 
027461 
053517 
000114 
005C1i> 
044103 
051511 
020075 

015 
041111 
042530 
051105 
020114 
042523 

015 
041111 
042530 
051105 
020114 
042502 
056504 

015 
052114 
042503 
046440 
051511 
043105 
000135 
005015 
051120 
047523 
042504 
047111 
041505 

040 
051105 
020123 
052522 
027107 
005015 
021440 

040 
043111 
052502 
020124 
042526 

015 
051105 
052040 
053517 
052106 
042510 



042503 
020103 
030067 
043040 

053523 
051040 
042524 

000 
055412 
051525 
041522 
053440 
042502 
056504 
055412 
051525 
041522 
053440 
047516 
052440 

000 
055412 
050111 
051523 
042117 
044440 
042506 

052533 
041517 
020122 
044440 
042440 
056524 
047533 
041440 
051101 
047116 
000135 
041407 

000 
050123 
042511 
020124 
041501 

000 
044412 
052522 
042510 
051105 
051105 
052040 



041113 
030440 
050040 
044501 

052111 
043505 
020122 

047125 
042440 
051511 
046111 
052440 
000 
047125 
042440 
051511 
0461 1 1 
020124 
042523 

052515 
047522 
051117 
020105 
020116 
052103 

044516 
051505 
047515 
020123 
043106 
000 
044124 
052520 
020105 
047111 

052520 

041505 
020104 
047516 
044524 

052116 
052120 
050040 
040440 
052040 
051505 



TM1 



TM2: 



TM4: 



TM5: 



TM6: 



TM7: 

TM10: 

TM1 1 : 
TM12: 

TM13: 



HALT 
RTI 

.S8TTL 
.ASCJZ 



J 7 

MACY11 30A(1052> 13-MAR-80 16:04 PAGE 75 



.■RETURN 

DATA AREA 

<CR><LF>\CEKBG-C 11/70 POW FAIL\ 



SEO 0087 



.ASCIZ <CR><LF>\SWITCH REGISTER = \ 



.ASCIZ <CR><LF>/CUNIBUS EXERCISER WILL BE USED]/ 



.ASCIZ <CR><LF>/[UNIBUS EXERCISER WILL NOT BE USED]/ 



.ASCIZ <CR><LF>/[MULTIPROCESSOR MODE IS IN EFFECT}/ 



.ASCIZ <CRXLF>/CUNIPROCESSOR MODE IS IN EFFECT]/ 

.ASCIZ / [OTHER CPUS ARE RUNNING.]/ 

.ASCIZ <CRXLFX07>/CPU #/ 

.ASCIZ / SPECIFIED BUT NOT ACTIVE/ 

.ASCII <CRXLF>/ INTERRUPT THE POWER AFTER THE TEST NUMBER APPEARS/ 



MAINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 

CEKBGC.P11 13-MAR-80 16:04 OATA AREA 
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SEO 0088 



4031 

4032 

4033 

4034 

4035 

4036 

4037 

4038 

4039 

4040 

4041 

4042 

4043 

4044 

4045 

4046 

4047 

4048 

4049 

4050 

4051 

4052 

4053 

4054 

4055 

4056 

4057 

4058 

4059 

4060 

4061 

4062 

4063 

4064 

4065 

4066 

4067 

4068 

4069 

4070 

4071 

4072 

4073 

4074 

4075 

4076 

4077 

4078 

4079 

4080 

4081 

4082 

4083 

4084 

4085 

4086 



041304 
041312 
041320 
041324 
041332 
041340 
041346 
041354 
041362 
041370 
041376 
041404 
041412 
041420 
041424 
041432 
041440 
041446 
041454 
041462 
041470 
041476 
041504 
041512 
041520 
041526 
041534 
041542 
041550 
041556 
041564 
041572 
041600 
041605 
041612 
041620 
041626 
041634 
041635 
041642 
041650 
041656 
041664 
041665 
041672 
041700 
041706 
041713 
041720 
041724 
041732 
041740 
041746 
041750 
041756 
041764 



020124 
051105 
040505 
044440 
020105 
040514 
043111 
044040 
047101 
047503 
026105 
051105 
052040 
053517 
005015 
042510 
047440 
051511 
040523 
052040 
043101 
047111 
050125 
020105 
020122 
020051 
052040 
005015 
040505 
042510 
047440 
052103 
027061 
015 
042524 
051440 
047117 
000 
015 
042524 
051440 
047117 
000 
012 
046440 
020122 
052520 
012 
052123 
005015 
020122 
041440 
000040 
005015 
040515 
020123 



052516 
040440 
051522 
020116 
044504 
027131 
054440 
053101 
051040 
051516 
044440 
052522 
042510 
051105 
052101 
042440 
020106 
046440 
042507 
042510 
042524 
042524 
020124 
047520 
032461 
047515 
046511 
047524 
044103 
042440 
020106 
047511 
005015 
005012 
044522 
041505 
030440 

005012 
044522 
041505 
031040 

052015 
051501 
051511 
021440 
006412 
000040 
047520 
040506 
052520 

047012 
051523 
042504 



041115 
050120 

044124 
050123 
005015 
052517 
020105 
020104 
0461 1 7 
052116 
052120 
050040 

052040 
042116 
044124 
051505 
020056 
042522 
026122 
051122 
044124 
042527 
034050 
042522 
051505 
051040 
052040 
042116 
042523 
020116 
000 

047105 TM14: 
043516 
044524 
005015 

047105 TM15: 
043516 
044524 
005015 

042510 TM76: 
042524 
041440 
000 

042524 TM77: 

042527 TM100: 

046111 

021440 

020117 TM101: 

052502 

044526 



.ASCI J / IN THE DISPLAY. /<CR><Lf> 



.ASCII /IF YOU HAVE AN RD CONSOLE, INTERRUPT THE POWER/ 



.ASCII <CR><LF>/AT THE END OF THIS MESSAGE. THEREAF TER. INTERRUPT THE POWER 15( 



.ASCIZ <CR><LF>/TO REACH THE END OF SECTION 1./<CR><LF> 

.ASCIZ<CR><LFXLF>/ENTERING SECTION 1/<CR><LF> 
.ASCIZ<CRXLF><IF>/ENTERJNG SECTION 2/<CR><LF> 

•ASCIZ<12><15>/THE MASTER IS CPU #/ 

.ASCIZ<12x12x15>/TEST / 

.ASCIZ <CRXLF>/POWER FAIL CPU * / 

.ASCIZ <CR><LFXLF>/NO MASS8US DEVICE AVAILABLE ON CPU * / 



HMNDEC-II-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 

CEKBGC.P1 1 13-MAR-80 16:04 DATA AREA 
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SEU 0089 



4087 

4088 

4089 

4090 

4091 

4092 

4093 

4094 

4095 

4096 

4097 

4098 

4099 

4100 

4101 

4102 

4103 

4104 

4105 

4106 

4107 

4108 

4109 

4110 

4111 

4112 

4113 

4114 

4115 

4116 

4117 

4118 

4119 

4120 

4121 

4122 

4123 

4124 

4125 

4126 

4127 

4128 

4129 

4130 

4131 

4152 

4133 

4134 

4135 

4136 

4137 

4138 

4139 

4140 

4141 

4142 



041772 

042000 

042006 

042014 

042021 

042026 

042034 

042042 

042050 

042052 

042060 

042066 

042074 

042102 

042110 

042115 

042122 

042130 

042136 

042144 

042152 

042160 

042165 

042172 

042200 

042206 

042214 

042222 

042230 

042233 

042240 

042246 

042254 

042262 

042270 

042271 

042276 

042304 

042312 

042320 

0*2326 

042334 

042342 

042347 

042354 

042362 

042370 

042376 

042404 

042412 

042413 

042420 

042426 

042434 

042442 

042450 



042503 
046111 
047440 
020125 

015 
042503 
020107 
054105 
000125 
005015 
020122 
051125 
041440 
020123 
052103 

015 
051440 
020117 
020122 
042440 
020105 
046505 

012 
020124 
051105 
045503 
020116 
042515 
042530 

012 
020105 
042515 
050040 
047440 

105 

012 
020105 
050103 
042527 
051440 
042510 
047125 
040510 

012 
047105 
051105 
020114 
047105 
051440 

115 

012 
052123 
047520 
020065 
042116 
042524 



040440 
041101 
020116 
020043 
050012 
042105 
047524 
020124 

047520 
040506 
020105 
052520 
054105 
042105 
043412 
052105 
047520 
040506 
052116 
054523 
027056 
006412 
040502 
020131 
050125 
046101 
020115 
123 
046415 
046101 
047515 
051117 
046116 

046415 
046101 
020125 
026522 
044527 
020123 
047440 
052114 
006412 
050040 
043040 
044124 
044524 
051531 

006412 
051117 
042527 
042523 
020123 
020122 



040526 
042514 
050103 
000 

047522 TM102: 
047111 
047040 
050103 

042527 Til 03: 
0461 1 1 
047117 
040440 
042520 
000 

052105 TM104: 
052040 
042527 
0461 1 1 
051111 
052123 
056 
052520 
052124 
040502 
047440 
020114 
047502 

045501 
020114 
054522 
051524 
047111 

045501 
020114 
047520 
050125 
041524 
051042 
020122 
042 
044124 
053517 
044501 
020105 
042522 
042524 

042522 
020105 
020122 
047503 
043101 
047520 



.ASCJZ <CRXLF>/PR0CEEDING TO NEXT CPU/ 



.ASCJZ <CR><LF>/POWER FAJI URE ON CPU AS EXPECTED/ 



.ASCII <CRXLF>/GET SET TO POWER FAIL ENTIRE SYSTEM / 



.ASCIK12X12X15>/PUT BATTERY BACKUP ON ALL MEM BOXES/ 



.ASCIK12X15>/MAKE ALL MEMORY PORTS ONLINE/ 



• ASCIK12X15>/MAKE ALL CPU POWER-UP SWITCHES 'RUN OR HALT"/ 



.ASCII<12x12x15>/THEN POWER FAIL THE ENTIRE SYSTEM/ 



.ASCIK12X12><15>/REST0RE POWER 5 SECONDS AFTER POWER FAIL/ 



nAINDEOn-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 
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SEQ 0090 



4143 

4144 

4145 

4U6 

4147 

4148 

4149 

4150 

4151 

4152 

4153 

4154 

4155 

4156 

4157 

4158 

4159 

4160 

4161 

4162 

4163 

4164 

4165 

4166 

4167 

4168 

4169 

4170 

4171 

4172 

4173 

4174 

4175 

4176 

4177 

4178 

4179 

4180 

4181 

4182 

4183 

4184 

4185 

4186 

4187 

4188 

4189 

4190 

4191 

4192 

4193 

4194 

4195 

4196 

4197 

4198 



042456 

042464 

042466 

042474 

042502 

042510 

042516 

042524 

042532 

042534 

042542 

042550 

042556 

042564 

042572 

042600 

042606 

042614 

042622 

042630 

042636 

042644 

042651 

042656 

042664 

042672 

042700 

042706 

042707 

042714 

042722 

042730 

042736 

042744 

042752 

042760 

042765 

042772 

043000 

043006 

043014 

043022 

043023 

043030 

043036 

043044 

043052 

043060 

043066 

043074 

043076 

043104 

043112 

043120 

043126 

043134 



042527 
046111 
006412 
041440 
047510 
042522 
040440 
051105 
000114 
005015 
051440 
020117 
020122 
046440 
054117 
005012 
041040 
054522 
052513 
040440 
046505 
047502 
012 
020105 
042515 
050040 
047440 
105 
012 
020105 
050103 
042527 
051440 
042510 
047125 
040510 
012 
047105 
051105 
020114 
042515 
130 
012 
052123 
047520 
020065 
042116 
042524 
042527 
046111 
006412 
052040 
047101 
051101 
020122 
042510 



020122 040506 



040505 
052520 
046125 
047520 
050040 
043040 

043412 
052105 
047520 
040506 
046505 
021440 
050015 
052101 
041040 
020120 
046114 
051117 
042530 
046415 
046101 
047515 
051117 
046116 

046415 
046101 
020125 
026522 
044527 
Q20123 
047440 
052114 
006412 
050040 
043040 
044124 
020115 

006412 
051117 
042527 
042523 
020123 
020122 
020122 

044124 
050131 
020131 
041501 
052101 
046440 



044103 
051440 
020104 
052122 
053517 
044501 

052105 TM106: 

052040 

042527 

046111 

041040 

000040 

052125 TM107: 
042524 
041501 
047117 
046440 
020131 
123 
045501 
020114 
054522 
051524 
047111 

045501 
020114 
047520 
050125 
041524 
051042 
020122 
042 
044124 
053517 
044501 
020105 
047502 

042522 
020105 
020122 
047503 
043101 
047520 
040506 

047105 
020105 
044103 
042524 
052040 
051501 



.ASCIZ<12><15>/EACH CPU SHOULD REPORT A POWER FAIL/ 



.ASCIZ <CR><LFXLF>/GET SET TO POWER FAIL MEM BOX » / 



.ASCIK12><12X15> /PUT BATTERY BACKUP ON ALL MEMORY BOXES/ 



.ASCIK12x15>/MAKE ALL MEMORY PORTS ONLINE/ 



.ASCIK12><15>/MAKE ALL CPU POWER-UP SWITCHES ' RUN OR HALT"/ 



.ASCIK12><12X15>/THEN POWER FAIL THE MEM BOX/ 



.ASCIK12><12x15>/RESTCRE POWER 5 SECONDS AFTER POWER FAIL/ 



• ASCIK12x15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 



MAINDEC-11-CEK8G-C PDP-11/70 SYSTEM POWER FAIL 
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SEO 0091 



V99 

4200 

4201 

4203 

4203 

4204 

4205 

4206 

4207 

4208 

4209 

4210 

4211 

4212 

4213 

4214 

4215 

4216 

4217 

4218 

4219 

4220 

4221 

4222 

4223 

4224 

4225 

4226 

4227 

4228 

4229 

4230 

4231 

4232 

4233 

4234 

4235 

4236 

4237 

4238 

4239 

4240 

4241 

4242 

4243 

4244 

4245 

4246 

4247 

4248 

4249 

4250 

4251 

4252 

4253 

4254 



043142 
043150 
043155 
043162 
043170 
043176 
043204 
043212 
043220 
043226 
043234 
043242 
043250 
043256 
043264 
043272 
043277 
043304 
043312 
043320 
043326 
043334 
043342 
043350 
043356 
043364 
043372 
043374 
043402 
043410 
043416 
043424 
043432 
043440 
043446 
043452 
043460 
043466 
043474 
043502 
043510 
043516 
043524 
043532 
043540 
043546 
043554 
043562 
043563 
043570 
043576 
043604 
043612 
043620 
043624 
043632 



042524 
051516 

012 
020110 
044123 
051040 
020124 
042527 
046111 
005012 
041040 
054522 
052513 
040440 
046505 
047502 

012 
020105 
042515 
050040 
047440 
042516 
042515 
020130 
020105 
026522 
042105 
006412 
040440 
052520 
051105 
053523 
051505 
020116 
046101 
005012 
020116 
020122 
052040 
046505 
005012 
047524 
053517 
051440 
051504 
051105 
051105 

114 

012 
047524 
046114 
051117 
052122 
044514 
006412 
052040 



020122 
0461 1 7 
042415 
050103 
052517 
050105 
020101 
020122 
051125 
050015 
052101 
041040 
020120 
046114 
051117 
042530 
046415 
046101 
047515 
051117 
043106 
047440 
020115 
047524 
047520 
040506 

040515 
046114 
050040 
052455 
052111 
021040 
051117 
021124 
052015 
047520 
040506 
042510 
041040 
051015 
042522 
051105 
041505 
040440 
050040 
043040 

051015 
042522 
046440 
020131 
020123 
042516 
044124 
050131 



047503 
105 
041501 
020125 
042114 
051117 
047520 
040506 
000105 

052125 TM108: 
042524 
041501 
047117 
046440 
020131 
123 
045501 
020114 
054522 
051524 
044514 
020116 
047502 
041040 
042527 
046111 

042513 
041440 
053517 
020120 
044103 
052522 
044040 

042510 
042527 
046111 
046440 
054117 
051505 
050040 
032440 
047117 
052106 
053517 
044501 

051505 
040440 
046505 
047520 
047117 

047105 
020105 



.ASCIZ<12><15>/EACH CPU SHOULD REPORT A POWER FAILURE/ 



.ASCJK12><12><15>/PUT BATTERY BACKUP ON ALL MEMORY BOXFS/ 



.ASCII<12><15>/MAKE ALL MEMORY PORTS OFFLINE ON MEM BOX TO BE POWER-FAILED/ 



.ASCIJ<12X15>/MAKE ALL CPU POWER -UP SWITCHES '*UN OR HALT"/ 



.ASCIK12><12X15>/THEN POWER FAIL THE MEM BOX/ 



.ASCn<12x12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 



.ASCIK12><15>/RESTORE ALL MEMORY PORTS ONLINE/ 



.ASCII'12x15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 



MAINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL 
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S6Q 009? 



4255 

4256 

4257 

4258 

4259 

4260 

4261 

4262 

4263 

4264 

4265 

4266 

4267 

4268 

4269 

4270 

42/1 

4272 

4273 

4274 

4275 

4276 

4277 

4278 

4279 

4280 

4281 

4282 

4283 

4284 

4285 

4286 

4287 

4288 

4289 

4290 

4291 

4292 

4293 

4294 

4295 

4296 

4297 

4298 

4299 

4300 

4301 

4302 

4303 

4304 

4305 

4306 

4307 

4308 

4309 

4310 



043640 
043646 
043654 
043662 
043670 
043676 
043703 
043710 
04 3 716 
043724 
043732 
043740 
043746 
043752 
043760 
043766 
043774 
044000 
044006 
044014 
044022 
044030 
044036 
044044 
044052 
044060 
044065 
044072 
044100 
044106 
044114 
044 1 22 
044130 
044136 
044144 
044147 
044154 
044162 
044170 
044176 
044204 
044206 
044214 
044222 
044230 
044236 
044244 
044252 
044260 
044266 
044270 
044276 
044304 
044312 
044320 
044326 



047101 
051101 
020122 
042510 
042524 
051516 

012 
050103 
052517 
050105 
020101 
020122 
051125 
006412 
044516 
042040 
021440 
006412 
052520 
006412 
047522 
040515 
053117 
052117 
047101 
047520 

012 
042040 
053440 
042502 
020104 
020122 
044510 
043501 
041511 

012 
040515 
020123 
042503 
041440 
000040 
005012 
020131 
042515 
041040 
046116 
051440 
047111 
051511 
000124 
005012 
041101 
052101 
041040 
020120 
046505 



020131 
041501 
052101 
046440 
020122 
046117 
047015 
020125 
042114 
051117 
047520 
040506 
000105 
053412 
043516 
044522 
000040 
047117 
021440 
051511 
051107 
046102 
051105 
020110 
020104 
052122 
052015 
044522 
046111 
052440 
040514 
047111 
020123 
047516 
000 
047015 
051523 
042504 
020123 
052520 

047415 
047117 
047515 
054117 
047111 
044513 
020107 
052040 

042015 
042514 
042524 
041501 
047117 
041040 



051511 
041040 
054522 
052513 
046440 
05.117 



SPGM1 



SPGM2: 
SPGM3: 



044103 
042524 
052040 
051501 
047503 
105 
020117 
044123 
051040 
020124 
042527 
0^61 1 1 

051101 
020072 
042526 

041440 
000040 
050040 
046501 
020105 
041040 
020101 
020102 
123 
042510 
042526 
020114 
042523 
042524 
052040 
044504 
052123 

020117 
052502 
044526 
047117 
021440 



046116 TM109: 

020105 

054522 

047440 

026505 

050120 

044124 

051505 



.ASCJZ<12><15>/NO CPU SHOULD REPORT A POWER FAILURE/ 



.ASCJZ <12><15x12>/UARNJNG: DRIVE * / 
,ASCIZ<12><15> /ON CPU M / 

.ASCII <12><15>/IS PROGRAMMABLE OVFR BOTH A AND B PORTS/ 



,ASCJZ<12X15>/THE DRIVE WILL BE USED LATER IN THIS DIAGNOSTIC/ 



NODEV: .ASCIZ <12><15>/NO MASSBUS DEVICES ON CPU # / 



.ASCIZ <12x12><15>/ONLY ONE MEMORY BOX ONLINE- SKIPPING THIS TEST/ 



TM110: . ASCI J<1 2x1 2x1 5>/DI SABLE BATTERY BACKUP ON MEM BOX TO BE POWER-FAILED/ 



HAINDEr-r-rEKBG-C PDP-11/70 SYSTEM 

CEKBGC .P1 1 13-MAR-80 16:04 DA 



4311 

4312 

4313 

4314 

4315 

4316 

4317 

4318 

4319 

4320 

4321 

4322 

4323 

4324 

4325 

4326 

4327 

4328 

4329 

4330 

4331 

4332 

4333 

4334 

4335 

4336 

4337 

4338 

4339 

4340 

4341 

4342 

4343 

4344 

4345 

4346 

4347 

4348 

4349 

4350 

4351 

4352 

4353 

4354 

4355 

4356 

4357 

4358 

4359 

4360 

4361 

4362 

4363 

4364 

4365 

4366 



044334 
044342 
044350 
044356 
Os4357 
044364 
044372 
044400 
044406 
044414 
044422 
044423 
044430 
044436 
044444 
044452 
044460 
044466 
044474 
044502 
044510 
044516 
044517 
044524 
044532 
044540 
044546 
044554 
044562 
044570 
044575 
044602 
044610 
044616 
044624 
044632 
044633 
044640 
044646 
044654 

044662 
044670 
044676 
044704 
044706 
044714 
044722 
044730 
044736 
044744 
044752 
044760 
044766 
044774 
045002 
045010 



052040 
050040 
043055 
104 
012 
040440 
040514 
052520 
050040 
047440 
105 
012 
020105 
051105 
046440 
051117 
046106 
047117 
052040 
050040 
043055 
104 
012 
020105 
050103 
042527 
051440 
042510 
047125 
047502 
012 
047105 
051105 
020114 
042515 
130 
012 
052123 
047520 
020065 
042116 
042524 
042527 
046111 
006412 
051117 
020114 
047520 
047117 
006412 
051117 
020114 
047520 
050125 
041524 
047524 



020117 
053517 
044501 

050015 
046114 
042526 
046440 
051117 
046116 

046415 
040515 
041440 
046505 
020124 
047111 
041040 
020117 
053517 
044501 

046415 
046101 
020125 
026522 
044527 
020123 
047440 
052117 
006412 
050040 
043040 
044124 
020115 

006412 
051117 
042527 
042523 
020123 
020122 
020122 

042522 
020105 
042515 
052122 
044514 
042522 
020105 
050103 
042527 
051440 
042510 
021040 



042502 
051105 
042514 

052125 
051440 
041440 
046505 
051524 
047111 

045501 
052123 
052520 
050040 
043117 
020105 
054117 
042502 
051105 
0425 K 

045501 
020114 
047520 
050125 
041524 
051042 
020122 
04? 
044124 
053517 
044501 
020105 
047502 

042522 
020105 
020122 
047503 
043101 
047520 
040506 

052123 
046101 
020115 
020123 
042516 
052123 
046101 
020125 
026522 
044527 
020123 
052522 



IER FAIL MACYll 30A(1052) 13-MAR-80 16:04 PAGE 81 

AREA SEO 0093 



.ASCJi<12><15>/PUT ALL SLAVE CPU MEM PORTS ONLINE/ 



4 

.ASCIK12x15>/MAKE MASTER CPU MEM PORT OFFLINE ON BOX TO BE POWER-FAILED/ 



.ASCI I<1 2><1 5>/MAKE ALL CPU POWER-UP SWITCHES ' RUN OR BOOT"/ 



.ASCI I<1 2><1 2x1 5>/THEN POWER FAIL THE MEM BOX/ 



.ASCIK12><12x15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 

I 

.ASCIK12x15>/RESTOR£ ALL MEM PORTS ONLINE/ 



.ASCIK12X15>/REST0RE ALL CPU POWER-UP SWITCHES TO ' RUN OR HALT"/ 



D 8 

MAINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 30A(1052) 13-MAR-80 16:04 PAGE 82 

CEKBGC.P11 13-WAR-80 16:04 DATA AREA 



SEO 0094 



4367 

4368 

4369 

4370 

4371 

4372 

4373 

4374 

4375 

4376 

4377 

4378 

4379 

4380 

4381 

4382 

4383 

4384 

4385 

4386 

4387 

4388 

4389 

4390 

4391 

4392 

4393 

4394 

4395 

4396 

4397 

4398 

4399 

4400 

4401 

4402 

4403 

4404 

4405 

4406 

4407 

4408 

4409 

4410 

4411 

4412 

4413 

4414 

4415 

4416 

4417 

4418 

4419 

4420 

4421 

4422 



045016 

045024 

045030 

045036 

045044 

045052 

045060 

045066 

045074 

045102 

045107 

045114 

045122 

045130 

045136 

045144 

045152 

045160 

045163 

045170 

045176 

045204 

045212 

045220 

045221 

045226 

045234 

045242 

045250 

045256 

045264 

045272 

045274 

045302 

045310 

045316 

045324 

045332 

045336 

045344 

045352 

045360 

045366 

045374 

045402 

045404 

045412 

045420 

045426 

045434 

045442 

045450 

045451 

045456 

045464 

045472 



020116 
0461.01 
006412 
052040 
047101 
051101 
020122 
0*2510 
042524 
051516 
012 
020110 
020105 
044123 
051040 
020124 
052116 
052120 
012 
044440 
052522 
040440 
042520 
000 
012 
051105 
020116 
053440 
042116 
046440 
041505 
000040 
005015 
042520 
050040 
043040 
042522 
050103 
005015 
042520 
050040 
052440 
052521 
047440 
000125 
005015 
040507 
042527 
047127 
042525 
047117 
000 
015 
043505 
053517 
020120 



051117 
021124 
044124 
050131 
020131 
041501 
052101 
046440 
020122 
046117 
042415 
046123 
050103 
052517 
050105 
047101 
051105 
000 
041415 
052116 
052120 
020123 
052103 

050015 
042040 
044524 
051501 
051105 
046111 
047117 

047125 
052103 
053517 
044501 
047440 
000125 
047125 
052103 
053517 
020120 
047105 
020116 

046111 
020114 
020122 
051440 
041516 
041440 

044412 
046101 
051105 
042523 



044040 

047105 
020105 
044103 
042524 
052040 
051501 
047503 
105 
041501 
053101 
020125 
042114 
051117 
044440 
052522 

052520 
051105 
042105 
054105 
042105 

053517 
053517 
042515 
052440 
031040 
051511 
051504 



054105 EM1 : 

042105 

051105 

052514 

020116 

054105 EM2: 

042105 

051105 

042523 

042503 

050103 

042514 EM3: 

047520 

047504 

050505 

020105 

052520 

046114 EM4: 
050040 
052440 
052521 



.ASCIK12><15>/THEN TVPE ANY CHARACTER AT THE MASTER CONSOLE/ 



.ASCJZ<12><15>/EACH SLAVE CPU SHOULD REPORT AN INTERRUPT/ 



TM111: .ASCJZ<12><15>/CPU INTERRUPTED AS EXPECTED/ 



SDOWN: .ASCIZ <12><1 5>/P0UER DOWN TIME WAS UNDER 2 MILISECONDS / 



.ASCIZ <CR><LF>/UNEXPECTED POWER FAILURE ON CPU/ 



.ASCIZ <CRXLF>/UNfcXPECTED POWER UP SEQUENCE ON CPU/ 



• ASCIZ <CRXLF>/ ILLEGAL POWER DOWN SEQUENCE ON CPU/ 



.ASCIZ <CR><LF>/ ILLEGAL POWER UP SEQUENCE/ 



E 8 

HAINDEC-11-CEKBG-C PDP-11/70 SYSTEM POWER FAIL MACY11 3OA(1052> 13-MAR-80 16:04 PAGE 83 

TEKBGCPH 13-MAR-80 16:04 DATA AREA 



SEO 0095 



4423 

4424 

4425 

4426 

4427 

4428 

4429 

4430 

4431 

4432 

4433 

4434 

4435 

4436 

4437 

4438 

4439 

4440 

4441 

4442 

4443 

4444 

4445 

4446 

4447 

4448 

4449 

4450 

4451 

4452 

4453 

4454 

4455 

4456 

4457 

4458 

4459 

4460 

4461 

4462 

4463 

4464 

4465 

4466 

4467 

4468 

4469 

4470 

4471 

4472 

4473 

4474 

4475 

4476 

4477 

44 78 



045500 

045505 

045512 

045520 

045526 

045534 

045542 

045550 

045556 

045564 

045572 

045600 

045606 

045614 

045615 

045622 

045630 

045636 

045644 

045651 

045656 

045664 

045672 

045673 

045700 

045706 

045714 

045722 

045725 

045732 

045740 

045746 

045754 

045762 

045766 

045774 

046002 

046010 

046014 

046022 

046030 

046036 

046044 

046052 

046053 

046060 

046066 

046074 

046102 

046110 

046116 

046124 

046132 

046140 

046146 

046154 



047105 
015 
050130 
020104 
052040 
005015 
042520 
052040 
047524 
005015 
042520 
052040 
047524 
000 
015 
042522 
020116 
020113 
047522 
015 
050040 
053440 
000 
015 
040440 
051523 
020120 
042105 
015 
051117 
051122 
020104 
053517 
044501 
005015 
052517 
050101 
042514 
005015 
020122 
051040 
042516 
020117 
000 
015 
042440 
020110 
047517 
020131 
052522 
051516 
052503 
005015 
046505 
043516 
046117 



042503 
052412 
041505 
051124 
020117 
047125 
052103 
040522 
030440 
047125 
052103 
040522 
030440 

040412 
051523 
052123 
051511 
043516 
047412 
020123 
047522 

047412 
042104 
052040 
040506 
000 
046412 
020131 
050125 
047117 
051105 
000114 
G44524 
020124 
043040 
000104 
047520 
04G506 
052105 
020104 
047523 

047012 
047516 
051117 
046440 
047111 
052103 
042440 
042524 
047516 
020056 
020056 
052101 



000 
042516 
042524 
050101 
000064 
054105 
042105 
020120 
000060 
054105 
042105 
020120 
032061 

042104 
047440 
041501 
053440 
000 
042114 
051511 
043516 

042104 
042522 
040522 
046111 

046505 
047503 
042524 
050040 
043040 

042515 
051124 
044501 

042527 
046111 
051125 
047524 
047117 

052117 
043525 
052040 
047101 
052123 
047511 
042530 
000104 
046440 
040515 
044526 
047511 



EM5: 
EM6: 
EM7: 

EM10: 

EM1 1 : 
EM12: 

EM13: 

EM14: 
EM15: 

EM16: 



.ASCIZ <CR><LF>/UNEXPECTED TRAP TO 4/ 



.ASCJZ <CRXLF>/UNEXPECTED TRAP TO 10/ 



.ASCIZ <CR><LF>/UNEXPECTED TRAP TO 114/ 



.ASCIZ <CR><LF>/ADDRESS ON STACK IS WRONG/ 



.ASCIZ <CRXLF>/0LD PS IS WRONG/ 



.ASCIZ <CRXLF>/0DD ADDRESS TRAP FAILED/ 



• ASCIZ <CRXLF>/MEMORV CORRUPTED ON POWER FAIL/ 



.ASCIZ <CRXLF>/TIME0UT TRAP FAILED/ 



.ASCIZ <CRXLF>/P0WER FAIL RETURNED TOO SOON/ 



.ASCIZ <CR><LF>/N0T ENOUGH OR TOO MANY INSTRUCTIONS EXECUTED/ 



EM17: 



.ASCIZ <CRXLF>/NO MEM. MANG. VIOLATION OR TRAP TO 4/ 



F 8 

■lAINDEC-T-CEKBG-C PDP-11/70 SYSTEM POWER FAIl MACYll 30A(1052> 13-MAR-80 16:04 PAGE 84 

CEKBW.P11 1 3-MA9-80 16:(K DATA AREA 



SEQ 0096 



4 A 79 

4480 

448" 

4482 

4483 

4484 

4485 

4486 

4487 

4488 

4489 

4490 

4491 

4492 

4493 

4494 

4495 

4496 

4497 

4498 

4499 

4500 

4501 

4502 

4503 

4504 

4505 

4506 

4507 

4508 

4509 

4510 

4511 

4512 

4513 

4514 

4515 

4516 

4517 

4518 

4519 

4520 

4521 

4522 

4523 

4524 

4525 

4526 

4527 

4528 

4529 

4530 

4531 

4532 

4533 

4534 



046162 
046170 
046176 
046201 
046206 
046214 
046222 
046225 
046232 
046240 
046246 
046254 
046262 
046266 
046274 
046302 
046310 
046316 
046324 
046327 
046334 
046342 
046350 
046356 
046364 
046372 
046377 
046404 
046412 
046420 
046426 
046434 
046442 
046450 
046456 

046461 
046466 
046474 
046502 
046510 
046514 
046522 
046530 
046536 
046544 
046552 
046560 
046563 
046570 
046576 
046604 
046606 
046614 
046622 
046630 



020116 
040522 
032040 

015 
044511 
052116 
052120 

015 
051117 
041040 
042116 
041504 
043501 
005015 
044504 
020124 
052040 
0521^2 
032062 

015 
045503 
047117 
041123 
040522 
020122 
047522 

012 
047520 
040506 
020116 
006412 
042520 
041440 
052116 
052120 

015 
044524 
041520 
020040 
051105 
005015 
052123 
020040 
050122 
052520 
020040 
051122 

015 
047124 
051105 
000103 
005015 
047516 
051122 
020040 



051117 
020120 

000 
047012 
052123 
051105 

000 
044412 
042522 
045522 
047457 
020106 
000123 
050103 
020104 
051124 
020117 
040525 

000 
041412 
052523 
046440 
051525 
051516 
051511 
043516 
047015 
042527 
046111 
050103 
047125 
052103 
052520 
051105 

000 

044412 
004504 
020040 
041440 
000122 
020040 
042111 
051105 
020103 
051105 
042515 
000 
052012 
020117 
047522 

042524 
020040 
051117 
020040 



052040 
047524 

020117 
044440 
052522 

041516 
052103 
040440 
020122 
046106 

020125 
047516 
050101 
044526 
020114 

042510 
020115 
051501 
052040 
042506 
053440 
000 
020117 
020122 
047440 
000125 
054105 
042105 
044440 
052522 



051511 
020040 
020040 
052520 

044511 
020040 
047522 
041440 
020122 
042515 

051505 
020040 
050122 

052123 
042440 
041520 
050040 



EM20: 
EM21 : 

EM22: 

EM23: 



EM24: 
EM25: 

DH5: 
DH7: 



DH10: 



DH11 



.ASC1Z <CR><LF>/N0 1 1ST INTERRUPT/ 



.ASC1Z <CR><LF>?INCORRECT BRK AND /OR DCF FLAGS? 



.ASCIZ <CR><LF>/CPU DID NOT TRAP TO VIRTUAL 24/ 



.ASCIZ <CR><LF>/CHECKSIM ON MASS8US TRANSFER IS WRONG/ 



.ASCIZ <12><15>/NO POWER FAIL ON CPU/ 



.ASCIZ <12><15>/UNEXPECTED CPU INTERRUPT/ 



•ASCIZ <CRXLF>/IISTID PC 



CPUERR/ 



, ASCIZ <CR><LF>/ IISTID ERRORPC CPUERR MEMERR/ 



.ASCIZ <CR><LF>/TESTNO ERRORPC/ 



.ASCIZ <CRXLF>/TESTNO ERRORPC PS/ 



MAlNDEt-1 1-CEkBG-C 
CEKBGC.P11 13-MAR-80 

£.535 046636 000123 

4536 046640 006412 

4537 046646 047516 

4538 046654 051117 

4539 046662 050040 

4540 046670 042101 

4541 046676 020123 

4542 046704 052123 

4543 046712 020106 

4544 046720 042515 

4545 046726 000 

4546 046727 01 5 
454 7 046734 047124 

4548 046742 051105 

4549 046750 020103 

4550 046756 051105 

4551 046762 005015 

4552 046770 047516 

4553 046776 044511 

4554 047004 020040 

4555 047012 051103 

4556 047020 050040 

4557 047026 020040 

4558 047034 051503 

4559 047037 015 

4560 047044 047124 

4561 047052 044440 

4562 047060 020104 

4563 047066 047125 

4564 047074 051440 

4565 047102 020104 

4566 047107 015 

4567 047114 047124 

4568 047122 044511 

4569 047130 020040 

4570 047136 047522 
4571 

4572 

4573 047144 014240 

4574 047152 000000 

4575 047154 014240 

4576 047162 014260 

4577 047166 014002 

4578 047174 014002 

4579 047202 000000 

4580 047204 014002 

4581 047212 000000 
458? 047214 014002 

4583 047222 014260 

4584 047230 014002 
<*585 047236 014260 

4586 047242 014002 

4587 047250 000000 

4588 047252 005015 

4589 047260 056440 

4590 047266 



PDP-11/70 SYSTEM 



16:04 




DATA 


042524 


052123 


DH12: 


042411 


051122 




041520 


020040 




043501 


020105 




fir i i fi/ 


\)J I JXJJ 




042522 


044507 




051105 


047440 




040502 


020104 




047515 


054522 




052012 


051505 


DH14: 


020117 


020040 




047522 


050122 




041440 


05252C 




000122 






042524 


052123 


DH20: 


020040 


020040 




052123 


0421 1 1 




020040 


040440 




020040 


020040 




052107 


020105 




020040 


043520 




000 






052012 


051505 


DH21 : 


020117 


020040 




051511 


044524 




020040 


047506 




020104 


020040 




047510 


046125 




042502 


000 




052012 


051505 


DH22: 


020117 


020040 




052123 


042111 






nsi in*; 




050122 


000103 




014064 


014250 


DT5: 


014064 


014250 


DT7: 


UwUw 






014064 


000000 


DT10: 


014064 


014240 


DT1 1 : 


014064 


014250 


DT12: 






r>T?n • 

U I C v • 


014270 


000000 




014240 


014250 


DT21 : 


000000 






014240 


014064 


DT22: 


020133 


045517 


OK: 


020040 


000 
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REA 



SEO 0097 



.ASCIZ<12><15>/TESTNO ERRORPC PAGE ADDRESS REGISTER OF BAD MEMORY/ 



.ASCIZ <CR><LF>/TESTN0 ERRORPC CPUERR/ 



. ASC TZ <CR><LF>/TESTN0 1 1 ST ID 



ACR 



PGTE 



PGCS/ 



.ASCIZ <CR><LF>/TESTN0 IISTID FOUND 



SHOULD BE/ 



.ASCIZ <CRXLF>/TESTNO IISTID 



ERRORPC/ 



.EVEN 

sreg0.$errpc.$reg1.0 

$re go . serrpc . $reg1 . $re g2 . 0 

$tstnm,serrpc,0 
$ts:nm,$errpc.$rego.o 

$tstnm,$errpc,$reg1 ,0 

$tstnm.$reg0,$reg1 ,$reg2, jreg3.0 

$tstnm,$reg0 # $reg1 ,$reg2,0 

$tstnm.$reg0,$errpc,0 

.asciz <cr><lf>/[ ok d / 

.EVEN 



j 



MAINDEC-II-CEkBG-C PDP-11/ 70 

IfKBGC.PII 15-MAR-80 16: 04 

4591 (K7266 001000 

4592 051266 020000 

4593 1 11266 000000 
4594 

4595 000001 



SYSTEM POWER FAIL MAC Y 11 
C ATA AREA 

ERR8UF: .BUU 1000 
CSK8UF: .8LKW 20000 
END: C 

.END 



) 13-MAR-80 16:04 PAGE 86 

SEO 0098 

.ERROR ASCII MSG STORAGE AREA 
.MASSBUS BUFFER AREA 
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SEO 0099 



A 


024540 


1871 


1877* 


ABASE = 


000000 


735 


776 


ACDW1 = 


000000 


735 


778 


ACDW2 = 


000000 


735 


779 


ACPUOP= 


000000 


735 


750 


ACR 


01 7030 


882* 


1128* 






12^3* 


1247* 






2129* 


2296* 






3834 




ADOWO = 


000000 


735 


780 


ADDW1 = 


000000 


735 


781 


AODU10= 


000000 


735 


790 


ADDW1 1= 


000000 


735 


791 


ADDW12= 


000000 


735 


7 92 


AD0W1 3= 


000000 


735 


793 


ADDW14= 


000000 


735 


794 


A00W15- 


000000 


735 


793 


ADDW2 = 


000000 


735 


782 


A00U3 - 


000000 


735 


783 


ADDW4 = 


000000 


735 


784 


ADDW5 = 


000000 


735 


785 


AD0W6 = 


000000 


735 


786 


ADDW/ = 


000000 


735 


787 


ADDW8 = 


000000 


735 


788 


ADDU9 = 


000000 


735 


789 


AOEVCT= 


000000 


735 


741 


ADEVM = 


000000 


735 


777 


ADR 


017032 


883* 


1132 






1991* 


1994 






2734 • 




AENV = 


000000 


735 


746 


AENVM = 


000000 


735 


747 


AFATAL = 


000000 


735 


738 


AMADR1 = 


000000 


735 


763 


AMADR2= 


000000 


735 


767 


AMADR3= 000000 


735 


770 


AMADR4= 


000000 


735 


773 


AMAMS1 = 


000000 


735 


757 


AWAMS2= 


000000 


735 


765 


AWAMS3= 


000000 


735 


768 


AMAMS4= 


000000 


735 


771 


AMSGAD= 


000000 


735 


743 


AMSGLG= 


000000 


735 


744 


AMSGTY= 


000000 


735 


737 


AMTYP1= 


000000 


735 


758 


AMTYP2= 


000000 


735 


766 


AMTYP3= 


000000 


735 


769 


AMTYP4= 


oooooo 


735 


772 


APASS = 


000000 


735 


740 


APRIOR= 


oooooo 


735 




APTCSU= 


000040 


3648* 




APTEW= 


000001 


3518 


3604 


APTSIZ= 


000200 


1079 


364 5# 


APTSPO= 


000100 


3606 


364 7 It 


ASWREG= 


oooooo 


735 


748 


ATESTN= 


oooooo 


735 


739 



11 31 » 
1255* 
2347* 



1134 

1265* 

2405* 



1 144* 
1828* 
2458* 



1165* 

1834 

2509* 



1171* 
1922* 
2567* 



1174* 
1990* 
2619* 



1 1 78* 
1993* 
2670* 



1218 
1999 
2728* 



1221* 
2000* 
2916 



1222* 1239* 
2010* 2047* 
2927* 31 54 



1145 
2001 



1166* 

2002 



1167* 
2017 



1172 
2406* 



1175* 
2409* 



1176* 
2411* 



1179 
2568* 



1223* 
2571* 



1258* 
2573* 



1261* 
2729* 



1263* 
2732* 



3646* 



nAINDEC 


-1 1 -CEkBG-C 


PDP-11/70 SVSTEM 


POWER 


FAIL 


MACY1 1 


CFxfiGC.Pr 13-MAR-80 


16:04 




CROSS REFERENCE 


TABLE 


AIM T = 


OOOOOO 


735 


742 










OOOOOO 

VwvW 


735 


749 








AVF f T 1 = 


000000 


735 


774 








AVF f T?= 


000000 
www 


735 


775 








RAD 


025160 

vC J I wV 


1966 


1974* 


1989 






OFT, IM 


021450 

VC 1 ~ J V 


1250 


1266* 








RFAftR 


01704? 


887* 


2203 


??08 

c c WO 


??1? 


2218 


BI TO = 


000001 

WWW l 


198* 


502 


1093 


115? 


1154 


a i TOO = 

O 1 1 ww 


000001 

WVW l 


188* 


198 








BIT01 = 


00000? 

vvWVL 


187* 


197 








BITO? = 


000004 


186* 


196 








BIT03 = 


000010 

WW 1 V 


185* 


195 








BI T04 = 


0000?0 

W WWC V 


1 84* 


194 


2968 






BIT05 = 


000040 

VWWW^W 


183* 


193 








BI T06 = 


000100 

WW 1 WW 


182* 


192 








BIT07 = 


000200 

WVWC WW 


181* 


191 








BIT08 = 

I J 1 1 WW 


000400 

wvV^wv 


180* 


190 








BIT09 = 


001000 

WW 1 www 


179* 


189 


3450 






BI T 1 = 


000002 

wwwwwt 


197* 


503 








BIT10 = 


002000 

WC. WW w 


178* 


543 








BIT11 = 


004000 


177* 


542 


1132 


1172 


4 4 

1179 


BIT12 = 


010000 

W 1 www 


176* 


541 








BIT13 = 


020000 

WC www 


175* 










BIT14 = 


040000 

w~ wwww 


174* 


513 


1853 


3434 




BIT15 = 


100000 

1 WWW 


173* 


514 


1128 


1221 


1239 






2347 


2458 


2509 


2619 


2670 


BI T2 = 


000004 

wwww w » 


196* 


504 


1223 


1991 




BIT3 = 


000010 

wwww * w 


195* 


505 








BIT4 = 


000020 

W W WW L. w 


194* 


549 


1327 


1371 


1401 






1579 


1590 


1616 

1 w * w 


164C 


1648 






3028 










BITS = 


000040 

W W W W^ w 


193* 


511 


548 


1849 




BI T6 = 


000100 

WWW f WW 


192* 


510 


547 


3004 




BIT7 = 


000200 

www w 


191* 


546 


2976 


2982 


2995 


BI T8 = 


000400 


190* 


545 


1860 


3878 




BIT9 = 


001000 

WW 1 WW 


189* 


512 


544 


1189 


1213 


BMSK 


017040 


886* 


1052* 


1166 


1186* 




BOOT 


014526 


808* 


2341* 


2365 


2386 

C — 1 W 


2503* 


BOXNUM 


014646 


835* 


2363 


2525 


2686 

t www 


2803* 


BPTVEC= 


000014 

wWWW l ~ 


205* 










BUFCLR 


032566 


2378 


2540 


2701 


2840* 

C \J~ W™ 


2843 


CACHVE= 


000114 


213* 


1305* 








CKSUH 


014650 


836* 


1361* 


1362* 


1363* 


1382 


C0NTRL= 


1 77746 


222* 


1189* 


1203* 


1213* 


2915* 


COUNTO 


016754 


862* 


3055* 


3064* 


3066 

J WWW 


3126 


COUNT! 


016756 


863* 


3069* 


3070 


3?14* 


3215 


COUNT? 


016^60 


864* 


3073* 


3074 


3218* 


3219 


COUNT 3 


016762 


865* 


3077* 


3078 


3222* 

•J c c c 


3223 


CPUACT 


016774 


870* 


1043 


1127* 


1177* 


1191 






2132 


2135 


2159 


J 169 


2288 






3399* 










CPUER 


040630 


1086 


1092 


1098 


1481 


1515 






2300 


2351 


2462 


2513 


2623 


CPUERR= 


177766 


234* 


2947 


3973 




CPULS1 


016770 


868* 


1191* 


1192* 


1983 


2005 


CPO - 


000001 


502* 
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2239 
1167 


2244 
1176 


2252 
1259 


2257 
2407 


2569 


2730 


2984 




1243 
2927 


1247 


1265 


1828 


1922 


2047 


2129 


2296 


1436 
1670 


1472 
1678 


1478 
1700 


1502 
1708 


1510 
1730 


1541 
1738 


1548 
1764 


1572 
1770 


3007 
















1856 


1879 


1886 


2915 


3510 








2527 
2819* 


2548 
2831 


2664* 


2688 


2709 


2858 






2206* 

3039 

3200* 


2209* 
3099* 
3209* 


2210* 
3114* 
3211 


2222 
3115* 


2242* 
3183 


2245* 
3243* 


2246* 


2261 


1259 
2407 


1822 
2450 


1896 
2569 


1925 
2611 


1928 
2730 


2050 
2795 


2053 
3303 


2090 
3395 


1552 
2674 


1583 
2830 


1652 
2865 


1682 
2887 


1712 
3972* 


1742 


1776 


1850 



2028 2101 
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CP1 - 


000002 


503* 
























CP2 = 


000004 


504* 
























CP3 = 


000010 


505* 
























CR = 


000015 


110* 


3881 


3978 


3983 


3987 


3993 


4000 


4007 


4018 


4025 


4034 


4045 4058 


4064 


4069 


4080 


4084 


4091 


4096 


4102 


4152 


4399 


4405 


4412 


4419 4424 






4428 


4432 


4437 


4442 


4446 


4451 


4457 


4461 


4467 


4475 


4482 


4486 4492 






4498 


4515 


4520 


4527 


4531 


4546 


4551 


4559 


4566 


4588 






fRLF = 


000200 


111* 
























C1 


016722 


850* 


1947 






















C2 


016724 


851AT 


1948 






















C3 


017004 


874* 


1949 






















DCF = 


000007 


490* 


1144 


1993 


2010 


















DDISP = 


177570 


104* 


686 


687 


688 


689 




1032 












DH10 


046563 


912 


954 


966 


984 


990 


1026 


* f ~\ 7 aa. 

4527* 










OH11 


046606 


960 


4531* 






















DH12 


046640 


972 


4536* 






















OHH 


046727 


978 


996 


4546* 




















DH20 


046762 


1002 


4551* 






















DH21 


047037 


1008 


4559* 






















DH2? 


047107 


1014 


1020 


4566* 




















. ,A* 

DH5 


046461 


936 


942 


t C 4 C AA 

4515* 




















DH7 


046514 


948 


4520* 






















DIGITS 


037640 


3689* 


3690* 


3691* 


3692 


3693* 


T "7/*v "7 

3707 


3709* 


3724* 


7777 £4 

3737* 








D1SPLA 


014170 


686* 


1088* 


1303* 


1357* 


1393* 


1428* 


1463* 


1492* 


1532* 


1 561 * 


1607* 


1631* 1661 


1691* 


1721* 


1 751 • 


1779* 


1917* 


2043* 


2125* 


2281* 


2297* 


2348* 


2443* 


2459* 2510 






2604* 


2620* 


2671* 


2766* 


3465* 


3488* 














DISPRE 


0001 74 


557* 


1088 






















DSKBUF 


051266 


887 


z r r\~\ aa 

4592* 






















DSWR = 


1 77570 


103* 


682 


683 


684 


685 
















DT10 


047166 


r\ a 7 

913 


955 


967 


985 


991 


1027 


1033 


4577* 










DT11 


047174 


961 


979 


997 


t aa. 

4578* 


















DT12 


047204 


973 


4580* 






















DT20 


047214 


1003 


4582* 






















DT21 


047230 


1009 


4584* 






















DT22 


047242 


1015 


1021 


4586* 




















DT5 


047144 


937 


943 


4573* 




















DT7 


0471 54 


949 


4575* 






















01 


016726 


852* 


2071 


2090 




















02 


016730 


853* 


2072 






















D3 


017006 


875* 


2073 






















EMTVEC= 


000030 


208* 


1063* 


1064* 




















EM1 


045274 


911 


4399* 






















EM10 


045615 


953 


4437* 






















EM1 1 


045651 


959 


4442* 






















EM12 


045673 


965 


/ / / A* AA 

4446* 






















EM13 


045725 


971 


4451* 






















EM14 


045766 


977 


4457* 






















EM15 


046014 


/—» O 7 

983 


4461* 






















EM16 


046053 


989 


4467* 






















ryl 7 

EMI ( 


046 1 5c 


one 


44f D* 






















EM2 


045336 


917 


4405* 






















EM20 


046201 


1001 


4482* 






















EM21 


046225 


1007 


4486* 






















EM22 


046266 


1013 


4492* 






















EM23 


046327 


1019 


4498* 






















EM24 


046377 


1025 


4505* 
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EM25 

EM3 

EM4 

EM5 

EM6 

EM7 

END 

ENTR 

ENTR22 

ENTR23 

ENTR24 

EOPLID 

ERR8UF 

ERRDIS 

ERRLCK 

ERR TAB 



046426 

045451 
045505 
045534 
045564 
111266 
033226 
014542 
014544 
014546 
036226 
047266 
040624 
017002 
014702 



ERRVEC; 
EXC 
EXIT 

EXTRA 
E1 
E2 
E3 

FACTOR 
FIRST 
FLAG 
FLAGB 
FORKTB 
GNS 

HERE 
HIA0RS= 
HI BOX 

HI CORE 
HITMIS= 
HOE = 
HT 

ILLDN 
ILLDUN 
ILLUP 
IMS* = 
INTMSK 
I0TVEC= 
ISTDIS 
J ST TAB 
ISTVEC 
KDPARO: 
KDPAR1 = 
KDPAR2= 
KDPAR3- 
KDPAR4= 
KDPAR5- 



000004 
000010 
014540 

016772 
016732 
016734 
017010 
017066 
017036 
014602 
016736 

021252 
= ****** u 

040300 
1 777^2 
014550 

014532 
1 77752 
100000 
000011 
035322 
034442 
034436 
000004 
017000 
000020 
040602 
014672 
017034 
172360 
172362 
172364 
172366 
1 72370 
1 72172 



PDP-11/ 70 
16-04 

1 031 

923 

929 

933 

941 

947 
3718 
2392 

814* 

815* 

816* 
3333 
3716 
1085 

873* 

843* 
1652* 
2462* 

201* 

491* 

813* 
2836* 

869* 

854* 

855* 

876* 

893* 

885* 

825* 

856* 
1228 

556 
3961 
3869* 

220* 

817* 
2632 

810* 

224* 

514* 

108* 
3227 
3083 
3025 

487* 

872* 

206* 
1898 

841* 

884* 

376* 

377* 

378* 

379* 

380* 

381* 



SYSTEM POWER FAIL 

CROSS REFERENCE 



4509* 
4412* 
4419* 
4424* 
4428* 
4432* 
4593* 

2554 2715 
2286* 2288 
2448* 2450 
2609* 261 1 
3342 3351 
3720 4591* 
1091 1097 
3532* 3576* 
1086* 1092* 
1663* 1682* 
2513* 2623* 
1069* 1085* 



L 8 
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TABLE — USER SYMBOLS 
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SEQ 01 



2290* 2302 



1049 
2154 
2155 
2156 

1051* 
1563* 
3396 
1233* 
3316 

3902 

2309 
2633 
2369* 



3265* 
3121* 
3118* 

1175 

3965* 
1966* 
1147* 



2159 



1584 
3398* 

3323 



2310 
2634 
2427* 



1187* 



1989* 
1251 



2915* 



3360 


3409* 










3970* 












3822 








1515* 




1098* 


1465* 


1481* 


1494* 


1534* 


1693* 


1712* 


1723* 


1742* 


1754* 


1776* 


2674* 


2805* 


2830* 


2865* 


2887* 


3970 


1091* 


1097* 


3439 


3440* 


3442* 


3445* 


2343 


2356* 


2452* 


2464 


2505 


2518* 



3967* 
3330 



2311 
2694 
2531* 



1995* 
1253* 



1552* 
1847* 



1564* 
1850* 



1583* 
2300* 



1633* 
2351* 



2613* 2625 2666 2679* 



3968* 
3339 



2371 
2695 
2589* 



3348 



2372 
2696 
2692* 



3357 3366 



2373 

2822* 

2750* 



2471 
2888 
3137 



3571 



2472 
2890 



3957 3958 3959 3960 



2473 2533 2534 2535 
2893 3149 3150 3151 



3965 
1898* 



2392* 2554* 2715* 
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SEO 0103 



KDPAR6= 

KDPAR7= 

KDPOR0= 

KDPDR1= 

KDPDR2= 

KDPDR3= 

KDPDR4= 

KDP0R5= 

KDP0R6= 

KDPDR7= 

KERSTK= 

KIPARO= 

KIPAR1= 

KIPAR2= 

KIPAR3= 

KIPAR4= 

K1PAR5= 

KIPAR6= 

KIPAR7= 

KIPDRO= 

KIPDR1= 

KIPDR2= 

KIP0R3= 

KIPDR4= 

KIPDR5= 

UPDR6= 

KIP0R7= 

LF 



IKS = 
LKVEC = 
LOADRS= 
L06 = 
L0G1 
L0G2 
LOOPS 
LOT = 
MAINT = 
MAP 

MAPHO = 
MAPH00= 
MAPH01= 
MAPH02= 
MAPH03= 
MAPH04= 
MAPH05= 
MAPH06= 
MAPH07= 
MAPH1 = 
MAPW10= 
MAPH11= 
MAPH12= 
MAPH13= 
MAPH14= 



172374 
1 72376 
172320 
1 72122 
172324 
1 72326 
172330 
172332 
172334 
172336 
013776 
172340 
172342 
172344 
172346 
172350 
172352 
172354 
172356 
172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 
000012 



177546 
000100 
177740 
001000 
016764 
016766 
016752 
040000 
177750 
033406 
170202 
170202 
170206 
170212 
170216 
U0222 
1 70226 
170232 
170236 
170206 
170242 
1 70246 
170252 
1 70256 
1 70262 



382* 
383* 
354* 
355* 
356* 
357* 
358* 
359* 
360* 
361* 
94* 
365* 
366* 
367* 
368* 
369* 
370* 
371* 
372* 
343* 
344* 
345* 
346* 
347* 
348* 
349* 
350* 
109* 
4064 
4428 
4498 
105* 
212* 
219* 
512* 
866* 
867* 
861* 
513* 
223* 
1755 
459* 
395* 
397* 
399* 
401* 
403* 
405* 
407* 
409* 
461* 
411* 
413* 
415* 
417* 
419* 



3043 3094 3187 3238 



2309* 

2310* 

2311* 

2863* 

2890* 

2893* 

2964* 

2852* 

2847* 

2849* 

2851* 

2864* 

2892* 

2895* 

2965* 

2853* 

3883 

4069 

4432 

4515 

3004* 



1982* 
2004* 
3062* 



2956* 

459 
461 
463 
465 
467 
469 
471 
473 



2371* 

2372* 

2373* 

2868 

2891* 

2894* 

2966* 
2957* 
2959* 
2961* 
2889* 

2963* 

2967* 

3978 

4080 

4437 

4520 

3007* 



1983 
2005 
3066 



2471* 

2472* 

2473* 

2875 

2906* 

2907* 

3145* 
3140* 
3142* 
3144* 



3146* 

3983 

4084 

4442 

4527 

3011* 



1987* 
2007* 
3070 



2533* 
2534* 
2535* 
2880* 

2962* 



2632* 
2633* 
2634* 
2888* 



2694* 
2695* 
2696* 
2905* 



2846* 2956* 
2848* 2958* 
2850* 2960* 



3139* 
3141* 
3143* 



3149* 
3150* 
3151* 



3987 
4091 
4446 
4531 



2100* 
2027* 
3074 



3993 
4096 
4451 
4546 



2101 
2028 
3078 



4000 
4102 
4457 
4551 



4007 
4152 
4461 
4559 



4018 
4399 
4467 
4566 



4025 
4405 
4475 
4588 



4034 
4412 
4482 



4045 
4419 
4486 



4058 
4424 
4492 



2105* 
2032* 

3126 3207* 



3211 



3215 3219 



3223 



1AINDEC- 


1 1-CEKBG-C 


PDP-11/70 SYS 


CFKBGC.P 


4 1 4 7 aa a r* Ort 

1 1 1 3-MAR-80 


16:04 




AA A Pk* »4 C _ 


170266 


421* 




nAPH16= 


l 70272 


423* 




MAPH1 7= 


1 70276 


425* 




MAPH2 = 


170212 


463* 




nAPH?o= 


1 70302 


427# 




MAPH21= 


170306 


429* 




HAPH22= 


170312 


431* 




WAPH23= 


1 7A71 a" 

1 70316 


433* 




hAPHc4= 


1 7A7^rt 

1 70320 


435* 




MAPH25= 


1 70326 


437* 




nAPHc6= 


1 7 A 771 

1 70332 


439* 




RAPHc7= 


1 70556 


441* 




WH3 = 


1 7 A ~> 1 aL 

I 70216 


465* 




MAPH30= 


I 7A 7 / 

1 70342 


443* 




Mirvi?1 — 


70346 


445* 






7035c 


447* 




nAPH55= 


AJ356 


449* 




MAPH34= 


7A7/ -5 

7036c 


451* 


* 


MAPH3:>= 


70366 


453* 




rtAPH3o = 


70572 


455* 






7057b 


457* 


3047 


MAPW4 - 


70222 


467* 




kapho = i 


7022b 


469* 




ai a rw 1a1 — 

PWPHo = 


70252 


471 * 




nArrlf = 


rUc5o 


473* 




HAPLU = 


7a^aa 
AJcUU 


/ r A u 

458* 




MAPLUU- 1 


7A0AA 

'UcUU 


7A/ A* 

594* 


/CO 

458 




7A"3A/ 

' Uc04 


396* 


460 


rtAPL0c= 


f UclO 


398* 


462 


ytni A7.. 


702 14 


400* 


464 


IIADi A/ * 


7A*nA 
70220 


/ /*» "* a* 

402* 


466 


ytrti AC — 


rUcc4 


404* 


468 


MAPL06= 


7rtT2A 

AJCjO 


406* 


470 


ytni A7 


AJc.54 


408* 


47? 


HAPL i = 




460* 




PTAPL 1 0= 


7A1/ ft 

f Uc4U 


410* 




MAPI 1 1 = 


7A1/ / 

mJc44 


412* 




MAPLlc- 


7A"5Crt 

rucbO 


414* 




HAPL 1 3= 




/ 1 Z A* 

416* 




IIADl 1 / — 


7AOJLA 


418* 




uini 1 C- 


f Uco4 


420* 




u a rti 1 / 

MAPL 16= 


7AT7A 

f Ocf 0 


422* 




P1APL 1 r = 


702 7 h 


424* 




AA A 1 — 

nAPLc = 


7A11 A 


462* 




HAPLcU= 


7A7AA 
7050\J 


426* 




AA A r»i H - 


7A7A/ 

f0304 


428* 




nAPL cc= 


7A71 A 


j 7 r\ a* 

430* 




IWLc3= I 


7A71 / 

7 U314 


/ 7 A* 

432* 




UADl "5 / — 

WL c««= 


m.'3cU 


/ 7 / Ai 

43«»* 






f U.V4 


/ 7^ A* 

436* 




piaplco- i 


7A77A 

7 U33U 


438* 




HAOl 17 ~ 1 

PW-TC' = 


7A17/ 


44U* 




MAPI X — 


'UC (*» 


464* 




MAPL30= 1 


70340 


442* 




MAPL31 = 1 


70344 


444* 




HAPll2= 1 


70350 


446* 
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SEO 0104 



3090 3191 



3234 



3045 



3092 



71 



89 



3236 



HAINDEC-11-CEKBG-C 
CEKBGC.P11 13-MAR-80 



mapl33= 

MAPI 34= 
MAPL35= 
MAPL36* 
MAPI 37= 
MAPI 4 = 
MAPL5 = 
MAP16 = 
MAPI 7 = 
MBDSW 
M3USR 
MEMERR= 
ME MS I Z 
MMERR 



1 70354 
170360 
170364 
170370 
1 70374 
1 70220 
1 70224 
170230 
170234 
014632 
033540 
1 77744 
032342 
033534 



WRO = 177572 



WR1 
MMR2 = 
WR3 = 
MMVFC = 
MPF 

MPSU - 

KSTENT 

MSO 

MTC = 

NCX = 

NOOEV 

NOPRMP 

NORH70 

NORP 

NS 

NXTDRV 
OK 

PARERR 

PARFLG 

PATCH* 

PATTRN 

PFDT 

PFF T 

PGCS = 
PGF 

PGTE = 
PIRO = 
PI ROVE = 
POWDWN 
POUUP 
PRO - 
PR1 = 
F*R2 

PR3 ■- 
PR4 
PR5 
PR6 



177574 
177576 
172516 
000250 
016737 
0001 00 
021224 
021342 
000015 
010000 
044147 
017012 
024516 
024664 
002000 
024500 
047252 
033340 
033342 
014530 
032700 
014622 
014612 

000001 
000005 
000000 
1 77772 
000240 
033774 
034256 
000000 
000040 
000100 
000140 
000200 
000240 
000300 



PDP-11/ 70 
16:04 

448* 

450* 

452* 

454* 

456* 

466* 

468* 

470* 

472* 

831* 
2205 

221* 
2342 
2855 
2994* 

244* 
2536* 
3034 

245* 

246* 

247* 

215* 

857* 

510* 
1211 
1233 

492* 

541* 
2179 

877* 
1872* 
1847 

543* 
1854 
2401 
1305 
1306* 

809* 
2377 

829* 

827* 
3251 

484* 

488* 

483* 

102* 

214* 
1304 
3061 

135* 

136* 

137* 

138* 

139* 

140* 

141* 
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SEO 0105 



1862* 
2214 
2948 
2504 
2969 
3148 
248 
2584 
3103 
249 
250 
251 
1756* 
1093* 
1082 
1225* 
1249* 

1965 
4290* 
2023* 
1902 
1901* 



3082* 





1875* 

1 Or J 


1885* 


1886* 

i uuu 


21 74 


2198 


2231 


2978 


2241 


2254 


2975* 












2951* 
















C \J\JJ 
















2971* 


2972 


2985* 


2986* 


2987* 


2988* 


2989* 


2990* 


1758* 


1774* 


2304* 


2312* 


2317* 


2374* 


2422 


2426* 


2588* 


2627* 


2635* 


2640* 


2697* 


2745 


2749* 


2866* 


3152* 


3178 


3247 












2854* 


2968* 


3040 


3098* 


3147* 


3184 


3242* 




2855* 


2969* 


3148* 












1099* 


1122 


1249 


1780 


3112 


3290 


3325 


3830 


1089 
















2088 


2194 














2325* 


2418* 


2487* 


2580* 


2648* 


2741* 


293?* 


3535* 



2991* 2992* 2993* 



2466* 
2883* 



2474* 
2398* 



2479* 
2902* 



1859 


1861 


1867* 










2563 


2724 


4588* 










2943* 














2944* 


2952* 










2870 


2376* 


2420* 


2538* 


2582* 


2699* 


2743* 


2421 


2539 


2583 


2700 


2744 


2858* 




1753* 


1965* 


2088* 


2194* 


2299* 


2350* 


2461* 


1171 


1178 


1222 


1990 








1165 


1255 


2000 


2405 


2567 


2728 




1513 


1593 


3025* 


3107 









3169 
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PR7 
PS 



= 000340 
= 177776 



PSU = 177776 
PUT 01 7062 
PWRDIS 040606 
PWRFL 014522 

PUR TAB 014662 



PWRVEC= 
P21 

RE LOON 
RE LOW I 
RELOLO 
RELOUP 
RESTAB 
RESTRT 
RESVEC= 
ROUTE 
RPAS = 
RPBA = 
RPCC = 
RPCS1 = 
RPCS2 = 
RPDA = 
RPOB = 
RPDC = 
RPDS = 
RPOT = 
RPEC1 = 
RPEC2 = 
RPER1 = 
RPER2 = 
RPER3 = 
RPLA = 
PPMR = 
RPOF = 
RPPGM 
RPSN = 
RPSRC 
RPWC = 
SAVRG 
SAV6 
SDPARO= 
SDPAR1= 
SDPAR2= 
S0PAR5= 
SDPAR4= 
S0PAR5= 
SDPAR6= 
S0PAR7= 
SDPDR0= 
SDPDR1= 
SDPDR2= 



000024 
026432 
014536 
033042 
033166 
014534 
037064 
020000 
000010 
014562 
176716 
176704 
176736 
176700 
176710 
176706 
176722 
176734 
176712 
176726 
1 76744 
176746 
176714 
1 76740 
176742 
176720 
1 76724 
176732 
016742 
176730 
024414 
176702 
014552 
014572 
172260 
172262 
172264 
172266 
172270 
}72272 
1 7227U 
172276 
U2220 
m222 
17222** 



142* 
99* 

1544* 

1722* 
100* 
891* 

1067 
806* 

2833 
839* 

3168* 
207* 

2187 
812* 

2367 

2424 
811* 

3299 
577 
202* 
820* 
526* 
521* 
534* 
519* 
523* 
522* 
528* 
533* 
524* 
530* 
537* 
538* 
525* 
535* 
536* 
527* 
529* 
532* 
859* 
531* 

1852* 
520* 
818* 
823* 
332* 
333* 
334* 
335* 
336* 
337* 
338* 
339* 
310* 
311* 
312* 



100 
1562* 
1733* 
1224* 
1053* 
1307 
2321 

1304* 

3201* 

1067* 

2190* 

2315 

2529 

2586 

2306 

3406 

1042* 



2980* 

2204* 
1849* 
2981* 



1869 
2979* 
3931* 
3054* 



1320* 

1574* 

1735* 

2291* 

1952* 

1521 

2340* 

1506* 
3227* 
1068* 

2318* 

2690 

2747 

2313* 

3579* 

3397 



1330* 


1358* 


1394* 


1404* 


1429* 


1439* 


1608* 


1632* 


1643* 


1645* 


1662* 


1673* 


1752* 


3006* 












CO 1 H 


Xf>7R 

JVJO 


?1 on* 


J I oc 


JC*»«|* 


2011 


2075* 


2158* 








3967* 












2397 


2414 


2483 


2502* 


2559 


2576 


1513* 


1586* 


1593* 


1846* 


2929* 


3025* 


3255* 


3969 










1307* 


1308* 










2425* 


2477 


2480* 


2587* 


2638 


2641* 


2886* 










2905* 












2370* 


2468 


2475* 


2532* 


2629 


2636* 



1464* 
1675* 



2644 
3061* 



1493* 
1692* 



2663* 
3083* 



1504* 
1703* 



SEQ 0106 



1533* 
1705* 



2720 2737 
3107* 3165 



3937* 3939 



2213* 
1852* 



2240* 2253* 
1863 1878* 



2976 2984* 2997 
2978* 



1853 1856 1860 1879 2982 2995 



1858* 1870 



3938 

3084 3199* 3228 



j 



MAINDEC 


-11-CEKBG-C 


PDP-11/70 SYSTEM 


POWER FAIL 


MACY11 


CEKBGC. 


PI 1 15-MAR-80 


16:04 




CROSS REFERENCE 


TABLE 


SDPDR3= 


1 72226 


313* 








SDPDP4= 


172230 


314* 








SDPDR5= 


172232 


315* 








SDPDR6= 


172234 


316* 








SDPDR7= 


172236 


31 7* 








SEC2 


024220 


1311 


1817* 


1819 




SED = 


000200 


546* 








SETClK 


033704 


3002* 








SE TMM 


032604 


2308 


2470 


2631 2846* 


2862 


SEU = 


000100 


547* 








SID = 


00! 000 


544* 








SIGNAL 


014642 


833* 


1938* 


1968* 1996* 


1998* 






3171* 


3253* 






SIPARO= 


172240 


321* 








SIPAR1= 


172242 


322* 








SIPAR2= 


1 72244 


323* 








SIPAR3= 


172246 


324* 








SIPAR4= 


172250 


325* 








SIPAR5= 


1 72252 


326* 








SIPAR6= 


172254 


327* 








SIPAR?= 


172256 


328* 








SIPOR0= 


172200 


299* 


3041 


3096 3185 


3240 


SIPDR1= 


172202 


300* 






SIPDR2= 


172204 


301* 








SIPDR3= 


172206 


302* 








SIPDR4= 


172210 


303* 








SIP0R5= 


172212 


304* 








SIP0R6= 


172214 


305* 








SIP0R7= 


172216 


306* 








SIU = 


000400 


545* 








SIZEHI= 


177762 


231* 








SIZELO= 


177760 


229* 








SI ZEND 


024630 


1866 


1876 


1894* 




SIZMBS 


024370 


1847* 








SLVENT 


021140 


1147 


1212* 






SLVID 


014644 


834* 


1214* 


1215 




SI 1 


021262 


1234 


^237* 






Sl2 


021302 


1235 


1241* 






Si 3 


021322 


1236 


1245* 






SRO = 


177572 


248* 








SR1 


177574 


249* 








SR2 = 


177576 


250* 








SR3 = 


172516 


251* 








SSD = 


000040 


548* 


3169 






SSU = 


000020 


549* 


1965 


2088 2194 


3251 


STACK = 


013776 


93* 


94 


95 96 


690 


START 


014502 


803* 


2358 


2520 2681 


2810* 






2863 






STCS = 


000003 


486* 








STF 


000006 


489* 








STKU1T= 


1 7777k 


101* 








STOP 


014462 


800* 


1047 


2807* 2808* 


2809* 


STRT 


020064 


575 


578 


1057* 


STS17 


025376 


1995 


2009* 






STTF = 


000002 


48!>* 








STO 


021076 


1124 


1203* 
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SEO 0107 



2886 

2092* 2113* 2115* 2196* 2225* 2227* 226A* 2266* 



691 692 693 

2811* 2812 2814* 2818 2820 2822 2824* 2860 
2815 2817* 2818* 2868 
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SEO 0" 



SUPSTK= 


013576 




95* 












1103 




1109 


1113 1115 


SUR 


014160 




682' 


1078* 


1081* 


1082 


1087* 


1089 


1104 




1256 


1309 


1349 


1387 


1420 


1454 


1482 


1524 


1553 


1599 1623 








1713 


1743 


1777 


2403 


2565 


2726 


2768 


3434 


3450 


3495 3510 


SWREG 


000176 




558* 




















SUO = 


000001 




170* 




















SWOO = 


000001 




160* 


170 


















SW01 = 


000002 




1 59* 


169 


















SU02 = 


000004 




158* 


168 


















SU03 = 


000010 




157* 


167 


















SUCK = 


000020 




156* 


166 


















SU05 = 


000040 




155* 


165 


















SU06 = 


000100 




154* 


164 


















SW07 = 


000200 




153* 


163 


1115 


1309 














SU08 = 


000400 




152* 


162 


2768 
















SW09 = 


001000 




151* 


161 


















SWT = 


000002 




169* 




















SW10 = 


002000 




150* 




















sun = 


004000 




149* 




















SW12 = 


010000 




148* 




















SU13 = 


020000 




147* 




















SW14 = 


040000 




146* 
1743 


1349 
1777 


1387 


1420 


1454 


1482 


1524 


1553 


1599 


1623 1653 


SU15 = 


100000 




145* 




















sy2 = 


000004 




168* 




















SW3 = 


000010 




167* 




















SUA = 


000020 




166* 




















SU5 = 


000040 




165* 




















SU6 = 


000100 




164* 












• 








SU7 


000200 




163* 




















SU8 = 


000400 




162* 




















SW9 = 


001000 




161* 




















SYNC . 1 


014712 




845* 


2025* 


2030* 


2145* 


2195* 


2248* 


2250* 


3254* 






SYNC. 2 


014714 




846* 

2233* 


1939* 
2235* 


1969* 
2789* 


1980* 
2793* 


1985* 

2795 


2063* 


2093* 


2098* 


2103* 


2146* 2184 


SYNC. 3 


016776 




871* 
3302* 


1818* 


1821* 


2284* 


2287* 


2446* 


2449* 


2607* 


2610* 


2791* 2794 


SYSTID= 


177764 




233* 




















S2LOG1 


016716 




848* 


1820* 


1822 
















S2LOG2 


016720 




849* 


1895* 


1896 
















S2L1 


01 7026 




881* 


1045 


1830* 


1894* 














TBITVE= 


000014 




203* 




















TI = 


004000 




542* 


1753 


1965 


2088 


2194 


2787 










TtMIT 


034446 




3106 


3125* 


3250 
















TKVEC = 


000060 




210* 




















TM1 


040644 




1076 


3978* 














* 




TM10 


041143 




4013* 




















TW100 


041724 




1961 


2084 


2190 


4080* 














TM101 


041750 




1872 


4084* 


















TM102 


042021 




2183 


4091* 


















TM103 


042052 




2326 


2419 


2488 


2581 


2649 


2742 


4096* 








TM10A 


042115 




2786 


4102* 


















TM106 


042534 




2379 


2541 


2702 


4152* 














TM107 


042600 




2546 


4158* 


















TM108 


043226 




2384 


4208* 


















TM109 


044206 




2835 


4296* 



















1126 
1653 



1206 
1683 



1713 



2201* 
3288* 



2228* 
3295* 
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SEQ 010<? 



TM11 

TM110 

TM111 

TM12 

TM13 

TM14 

TM15 

TM2 

TM4 

TM5 

TM6 

T M7 

TM76 

TM77 

TPVEC : 

TQL 1 

TRAPVE: 

TRTVEC: 

TST1 

TST10 

TST11 

TST12 

TST13 

TSTK 

TST15 

TST16 

TST17 

TST? 

TST20 

TST21 

TST22 

TST23 

TST24 

TST25 

TST3 

TST4 

TST5 

TST6 

TST7 

TS17A 

TS17B 

TS20A 

TS208 

TS21A 

TS21B 

TS22A 

TS228 

TS23A 

TS23B 

TS24A 

TS248 

TS25A 

TS25B 

TYPDS - 



041176 

044270 

045163 

041207 

041241 

041605 

041635 

040676 

040723 

040765 

041033 

041100 

041665 

041713 

000064 

017024 

000034 

000014 

021450 

022762 

023160 

023252 

023406 

023542 

023676 

024032 

024674 

021704 

025524 

026114 

027076 

030120 

031142 

032164 

022044 

022176 

022330 

022444 

022636 

025050 

025172 

025674 

026006 

026270 

026656 

027352 

027162 

030374 

030204 

031416 

031226 

032232 

032264 

104405 



TYPE = 104401 



1158 
2707 
2024 
1161 
1317 
1 314 
1826 
1108 
1117 
1120 
M02 
1100 
1136 
1955 
211* 
880* 
209* 
204* 
1229 
1560* 
1606* 
1630* 
1660* 
1690* 
1720* 
1750* 
1899 
1356* 
1934 
2059 
2141 
2305 
2467 
2628 
1392* 
1427* 
1462* 
1491* 
1531* 
1943 
1945 
2067 
2069 
2150 
2152 
2294 
2293 
2456 
2455 
2617 
2616 
2774 
2775 
1138 
3335 
1* 



4018* 

4305* 

2933 

4020* 

4025* 

4064* 

4069* 

3983* 

3987* 

3993* 

4000* 

4007* 

4074* 

2078 

3841* 
1065* 

1230 

1600 

1624 

1654 

1684 

1714 

1744 

1778 

1916* 

1388 

2042* 

2124* 

2280* 

2345 

2507 

2668 

1421 

1455 

1483 

1525 

1554 

1951* 

1979* 

2074* 

2097* 

2157* 

2230* 

2331* 

2296* 

2493* 

2458* 

2654* 

2619* 

2776* 

2787* 

1160 

3344 

1076 



4385* 



2163 

3857* 
1066* 

1231 



2334 
3867* 

1232 



2496 
3907* 

1240 



2657 2779 



4078* 



1244 1248 1302* 1350 



3579 



3580 3581 



3582 



1971 

2095 
2185 

2357 
2519 
2680 



1976 

2116 
2202 

2442* 
2603* 
2765* 



2008 
2229 



2033 

2237 2268 



1981 
2099 



2314 


2316 


2319 


2324 


2327 














2^76 


2478 


2481 


2486 


2489 














2637 


2639 


2642 


2647 


2650 


2934 












1874 


1889 


1892 


1963 


2086 


'2181 


2192 


2382 


2544 


?705 


3320 


3353 


3362 


3370 


3961* 
















1100 


1102 


1108 


1111 


1112 


1117 


1120 


1136 


1157 


H58 


1161 



1A1NDEC-1V 
r EKBGC.PH 



•CEKBG-C 

13-MAR-80 



TYP1T 
TYPLCK 
TVPOC = 
TYPON = 
TYPOS = 
TYPQUE 



040504 
017064 
104402 
104404 
104403 
014716 



UBCR2 = 170016 



UBEF 



016740 



UBElCK 017022 



U8ESW = 

UDPAR0= 

UDPAR1= 

UOPAR2= 

UOPAR3= 

UOPAR4= 

UDPAR5= 

UOPAR6= 

UDPAR7= 

U0P0R0= 

UDPDR1= 

UDPDR2= 

UOPOR3= 

UOPOR4= 

UDPDR5= 

UDPDR6= 

UDPOR7= 

UIPAR0= 

UIPAR1= 

UIPAR2= 

UIPAR3= 

UIPAR4= 

UIPAR5= 

UIPAR6= 

U I PAR 7= 

UIP0R0= 

UIPOR1= 

UIP0R2= 

UIP0R3= 

UIP0R4= 

UIPOR5= 

UIP0R6= 

UIP0R7= 

UNIEOP 

USESTK- 

WAIT = 



000040 
177660 
177662 
177664 
177666 
177670 
177672 
177674 
177676 
177620 
177622 
177624 
177626 
177630 
1 77632 
177634 
177636 
177640 
177642 
177644 
177646 
177650 
177652 
177654 
177656 
177600 
1 77602 
177604 
177606 
177610 
177612 
177614 
177616 
036032 
013476 
****** i j 



PDP-11/70 
16:04 

1314 
2078 
2326 
2657 
3321 
3541 
3882 
892* 
1110 
3960* 

1958 

847* 
3876* 

474* 

1590* 

858* 
1497 
1706 

879* 
1727* 

511* 

288* 

289* 

290* 

291* 

292* 

293* 

294* 

295* 

266* 

267* 

268* 

269* 

270* 

271* 

272* 

273* 

277* 

278* 

279* 

280* 

281* 

282* 

283* 

284* 

255* 

256* 

257* 

258* 

259* 

260* 

261* 

262* 
3326 

96* 
3305 
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SEO Oil 



1317 
2084 
2334 
2702 
3327 
3543 
3884 
1054* 
3567 

2081 
1070* 
3893 
1327* 
1616* 
1118* 
1508 
1725 
1324* 
1761* 
1113 



1318 

2087 

2379 

2707 

3328 

3548 

3886 

3534* 

3958* 

2166 

1071* 

3895 

1371* 

1640* 

1121* 

1536 

1736 

1368* 

3110* 



1826 
2106 
2384 
2724 
3336 
3550 
3888 
3575* 



2337 

3392 

3898* 

1401* 

1648* 

1315 

1546 

1759 

1398* 



1872 
2163 
2401 
2742 
3337 
3569 
3890 
3824 



2499 

3393 

3905* 

1436* 

1670* 

1322 

1567 

1768 

1433* 



1887 
2179 
2419 
2779 
3345 
3574 
3903 



2660 

3401* 

3906* 

1472* 

1678* 

1340 

1577 

3026 

1469* 



1890 


1893 


1955 


1961 


1964 


1988 


2024 


21 R.? 
C • oc 


C I 0 J 


pi on 




L£ JO 


CC J I 




2488 


2496 


2541 


2546 


2563 


2581 


2640 


2785 


2786 


2797 


2835 


2933 


3128 


3314 


3346 


3354 


3355 


3363 


3364 


3371 


3499 


3715 


3801 


3957* 










3915* 


3916 












2782 


3959* 










3873 


3402* 


3844 


3847* 


3851 


3854* 


3871 



1478* 

1700* 

1366 

1588 

3108 

1499* 



1502* 

1708* 

1396 

1611 

3394 

1538* 



1510* 

1730* 

14^0 

1635 

3400* 

1569* 



1541* 
1738* 
1431 
1646 



1548* 
1764* 
1445 
1665 



1572* 
1770* 
1467 
1676 



1579* 
3028* 
1476 
1695 



1613* 1637* 1667. 1697* 



3036 3101 3180 3245 



3368* 
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YELL II 
YYY 
SAFRK 
SAP T HO 
SASTAT 
SAT YC 
SAT Y1 
SATY3 
SATY4 
SAIJTOB 
S6ASE 
SfiOADR 
SfiOOAT 
SCDU1 
SCDW2 
SCKSWR= 
SCMTAG 
SCM1 = 
SCM2 = 
SCM3 = 

scm4 = 

SCPU1D 

SCPUOP 
SCRLF 

SOBLK 
SODWO 
SOOW1 
SDDW10 
SODW11 
SDDW12 
SODW13 
SODWH 
SODU15 
SODW2 
SODW3 
SDDW4 
SODW5 
S0DW6 
SODW7 
S0DW8 
SODW9 
SOEVCT 
SDEVW 
SDOAGN 
SOOUN 
SDTBL 
SEND AD 
SENDCT 
SENULL 
SEW 
SENVM 
SEOP 
SEOPCT 
SfOPSG 



017052 
014524 
000000 
000230 
= •••••• u 

037120 
037074 
037102 
037112 
014154 
014412 
014114 
014140 
014416 
014420 
• ••••• (j 

014000 . 
000005 
000012 
000005 
000005 
014226 

014364 
014333 

040062 
014422 
014424 
014446 
014450 
014452 
014454 
014456 
014460 
014426 
014430 
014432 
014434 
014436 
014440 
014442 
014444 
014346 
014414 
036122 
045221 
040052 
036112 
035446 
036222 
014356 
014357 
035326 
035434 
014134 



PDP-11/ 70 
16:04 

889* 
807* 
1* 

593 
3626 
3597 
3595* 
3596* 
3521 

679* 

776* 

660* 

673* 

778* 

779* 
3964 

61 3* 

709* 

709* 

707* 

719* 

703* 
2919 

750* 

729* 
3354 
3766 

780* 

781* 

790* 

791* 

792* 

793* 

794* 

795* 

782* 

783* 

784* 

785* 

786* 

787* 

788* 

789* 

741* 

777* 
3310 
3128 
3769 

565 
1209 
3407* 

746* 

74 7* 
1782 
1209* 

668* 
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SEO 0111 



3174 
3558* 

599* 
3641 
3599* 



3598* 



1204 
711* 
711* 
709 
720* 
1058 
3157 

1111 
3363 
3801 



3561* 3562 3565* 3566 



713* 
713* 

721* 
1139* 
3411 

1112 
3371 
3810* 



715* 
715* 

722* 
1162 



1157 
3543 



717* 
717* 

723* 
1220* 



1318 
3550 



719* 
719* 

724* 
1838 



1964 
3574 



1873 1891 1962 2012 
2087 2182 2193 2785 



2085 2180 2191 



3327 3336 3345 



3382 


3385 


3391* 


4391* 






3806* 






3387* 


3526 




3312* 






3518 


3604 


3628 


1079 


3606 


3817 


2770 


2798 


3287* 


3308* 


3313 




3294* 


3296 


3301* 



3289 
3303 



3404* 
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TABLE - 
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SERFLG 


014006 


61 9* 


3427 


3448 


7/ CC* 


3468 


3486* 


SERGBL 


014224 


702* 


3369 


^ ^ ^ . 

3372* 


3490* 






IERMAX 


014060 


644' 


3464* 


3468 








SERROR 


036432 


1063 


3485* 






4573 


4575 4577 


SERRPC 


014064 


648# 


3491* 


3492* 


7/ 07 

54V5 


KRRSP 


014074 


652* 


3494* 










IERRT8 


017070 


909* 


3539 










tERRTY 


036652 


3530* 








3361 


3373 3489* 


SERTTL 


014042 


635* 


3334 


77/ 7> 

3345 


TIC 3 

553*? 


tESCAP 


014322 


724* 


1226* 


7/ 7 «. 

5465* 


7C1 7 

5 j I 5 


3515 




tETABL 


0H356 


745* 












SETEND 


014462 


605 


798* 










V ATAL 


014340 


738* 


3632* 




5655* 


3643* 




VflG 


037340 


3595* 


3598* 


56<:6 




V ILLC 


014222 


700* 












SF ILLS 


014221 


699* 












tGDADR 


014104 


656* 












tGDOAT 


014124 


664* 










• 


MET 


036102 


3380 


3384* 










$GET42 


036072 


3381* 












$GTSWR= 


****** \j 


3963 












$HD = 


000000 


11 












SHIBTS 


000230 


600* 












1ICNT 


0H012 


623* 












tILLUP 


035316 


3168 


3261* 










SINTAG 


014155 


680* 






7C7A 






tITEMB 


014054 


640* 


3493* 








$LF 


014334 


730* 












HFLG 


037337 


3636* 


3642* 










tlPADR 


014022 


627* 


3453* 


546 1 * 


5*»66 


3468 


3512 


$LPERR 


014032 


631* 


1227* 


7/C7 


7/ A?* 

5*t6<r* 


3468 


SMADR1 


014370 


763* 












SMADR2 


014374 


767# 












SMADR3 


014400 


770* 












SMADR4 


014404 


773* 












SMAIL 


014336 


601 


605 


77/ M 

r 56* 


7/ C7 

543 f 






SMAMS1 


014366 


757* 












SMAMS2 


014372 


765* 












SMAMS3 


014376 


768* 












IMAMS4 


014402 


771* 












tMBADR 


000232 


601* 












JMFLG 


037336 


3596* 


3602 


7/ 77 t 

565f * 


5641 AT 






SflSGAD 


014352 


743* 


3612* 


7Z. 1 C 

561 j 








SMSGLG 


014354 


744* 


3617* 










JMSGTY 


014336 


737* 


3610 


3618* 


7^ 7A 

5630 


3634* 




JMTYP1 


014367 


758* 












V1TYP2 


014373 


766* 












JMTYP3 


014377 


769* 












SMTYP4 


014403 


772* 










2267 2797 


SNULL 


014220 


698* 


1988 


31 OA 


337A 
CC JO 


2251 


$NWTST= 


000001 


1299* 


1353* 


1389* 


1424* 


1459* 


1488* 1528* 






1747* 


1913* 


2039* 


2121* 


22770 


2439* 2600* 


SOCNT 


037634 


3685* 


3721* 


3734* 






3736* 


SOHODE 


037636 


3680* 


3684* 


3689 


3692*- 


3703* 


SOVER 


036416 


3435 


3454 


3465* 








$PASS 


014344 


740* 


1210* 


3305* 


3306* 


3318 


3407 
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SEO 0112 



4578 4580 



4586 



1557* 
2762* 



1603* 1627* 1657# 1687* 1717» 
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TABLE -- USER SYMBOLS 












SE0 


mm n J 1 n 


000? V» 


603* 




























04VS? 


1887 


4268* 
























iPGM? 




1890 


4272* 




























1893 


4274* 
























SPOWER 


034464 


1832 


3136* 




























838* 


1103* 


1 106 


3391 


3403* 






















1846 


2929 


31 Aft* 






















VPUpl p 




3201 


3227* 




























728* 




























•••••• y 


3964 


























tADDF f = 




3964 


























*™y l/L. i r* - 




3964 




























*••••• y 


3964 


























iRFGAD 


014236 


707* 


























1ft F GO 




709* 


1836* 




4575 


4578 


458? 


4584 


4586 












1RFG1 


014?50 


711* 


1999* 


?0?0* 


?875* 


?947* 


3973* 


4573 


4575 


4580 


4582 


4584 






WEG2 


014260 


713* 


2001* 


2021* 


2948* 


4575 


458? 


4584 














WFG3 


014270 


715* 


2002* 


458? 






















WEG4 


014300 


71 7* 


























lft2A = 


****** y 


3964 


























$SAVRE= 


•*••*• y 


3964 


























SSCOPE 


036252 


3433* 


























SSETUP- 


000034 


584* 


3292 


3434 












- 










SSTUP = 


177777 


584* 


























SSVLAD 


036356 


3443 


3449 


3456* 






















tSVPf = 


000200 

v/wc w 


563* 


568 
























SSWR - 


141000 


1* 


11 


72^ 


728 


1304 


1358 


1394 


1429 


1464 


1493 


1533 


1562 


1608 






1632 


1662 


1692 


1722 


1752 


1918 


2044 


2126 


2282 


2444 


2605 


2767 


3284 






3292 


3383 


3406 


3407 


3427 


34 ?8 


34 ?9 


3430 


3434 


3446 


3448 


3449 


3450 






3456 


3462 


3465 






















SSWREG 


014360 


748* 


1081 


1087 






















$SWRMK= 


000000 

www 


3430 


























STESTN 


014342 


739* 


3459* 
























$TKB 


014212 


695* 


2842 
























STKS 


014210 


694* 


2390 


2395 


2552 


2557 


2713 


2718 


2840 












itmpo 


014310 


719* 


1156* 


1159 




















$TMP1 


014312 


720* 


























STMP2 


014314 


721* 


























STMP3 


014316 


722* 


























STMP4 


014320 


723* 


























$TN = 


000026 


1* 


11 


1299 


1303 


1304* 


1349 


1353 


1357 


1358* 


1387 


1389 


1393 


1394* 






1420 


1424 


1428 


1429* 


1454 

1 "f ^ "t 


1459 


1463 


1464# 


148? 


1488 


1492 


1493* 


1524 






1528 


1532 


1533* 


1553 


1557 


1561 


1562* 


1599 


1603 


1607 


1608* 


1623 


1627 






1631 


1632* 


1653 


1657 


1661 


1662* 


1683 


1687 


1691 


1692* 


1713 


1717 


1721 






1722* 


1743 


1747 


1 751 




1 777 

If" 


1913 


1917 


1918* 


2039 


2043 


2044* 


2121 






2125 


2126* 


2277 


2281 


2282* 


2439 


2443 


2444* 


2600 


2604 


2605* 


2762 


2766 


$TPB 


014216 


2767* 
697* 


3917* 
























STPFLG 


014223 


701* 


























$TPS 


014214 


696* 


3915 
























STRAP 


040520 


*065 


3931* 
























STRAP2 


040554 


3945* 


3956 
























STRP = 


000006 


3949* 


3958* 


3959* 


3960* 


3961* 


3962* 
















STRPAD 


040566 


3936 


3956* 






















tTSTM 


000234 


602* 


























STSTNW 


014002 


615* 


1951* 


1957 


1979* 


2074* 


2080 


2097* 


2157* 


2165 


2230* 


2283* 


2336 


2445* 
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2498 








4578 


II YPBN- 


•••••• 


u 


3962 


STYPDS 


037642 




3754* 


tTVPE 


040072 




3623 


STYPOC 


037366 




3683* 


STYPON 


037402 




3682 


tTYPOS 


037342 




3678* 


tUNIT 


014350 




742* 


SUNITM 


000240 




604* 


SUSWR 


014362 




749* 


SVECT1 


014406 




774* 


1VECT2 


014410 




775* 


SXTSTR 


036262 




3437* 


«G€T4= 


000001 




3383* 


SSSTP 


014200 




690* 








1474 








1741 








2928 


SOf ILL 


037635 




3679* 


$40CAT= 


*»***» 


U 


3434 


= 


111270 




552* 








731 








1417 








1698 








3408* 


. 1 1ST = 


000000 




480* 


.SASTA= 


•••••• 


U 


3596 


.SX = 


000230 




589* 



SYSTEM POWER FAIL MAC Y 1 1 
CROSS REFERENCE TABLE 



2606* 


2659 


2767* 


2781 


4580 


4582 


4584 


4586 


3961 






3957 


3816* 


3825 


3949 


3958 








3685* 


3960 






3959 








3384* 








1057 


1208 


1237 


1241 


1514 


1543 


1551 


1610 


1766 


1775 


1829 


1921 


3032 


3176 


3298 


3405 


3683* 


3693 


3735* 




556* 


563 


564* 


566* 


847* 


1041* 


1130 


1169 


1434 


1448 


1452 


1470 


1728 


1762 


2016 


2429 


3468 


3506* 


3644* 


3810* 


3292 









3599 
594 
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- USER SYMBOLS SCO 011 

3427 3456- 3459 3465 3468 3488 3559 4577 



1245 1333 1338 1386 1406 1407 1441 1442 
1622 1642 1651 1672 1681 1702 1711 1732 
2046 2128 2298 2349 2460 2511 2621 2672 



568* 574* 576* 589 590* 592* 594* 612* 

1207 1325 1336 1343 1347 1369 1399 1413 

1500 1518 1522 1539 1570 1614 1638 1668 

2591 2752 3119 3122 3263 3267 3317* 3407 

4590* 4591* 4592* 
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SEO 011 



AFORK 

BFORK 

BLK 

BLKB 

COMMEN 

DEQUE 

E 

ENDCOM 

ENQUE 

ERROR 

ESCAPE 

EXTRAS 

GETLID 

GETPID 

GETPRI 

GETSID 

GETSWR 

IISTD 

IISTE 

LOOP 

LOOPX 

MEMBOX 

MULT 

NEWTST 

P 

POP 

PUSH 

QINIT 

REPORT 

RESPRI 

SAVPRI 

SCOPE 

SET* 

SETPRI 

SETS 

SETTRA 

SETU 

SETUP 

SKIP 

SLASH 

SPACE 

STARS 



SWRSU 

SYNC 

TEST 

TRMTRP 

TSTNO 

TSTNUM 



18* 
19* 
615* 
615* 
1* 
28* 
1* 
1* 
26* 
97* 
2876 
1* 
32* 
26* 
25* 
1* 
24* 
1* 
23* 
22* 
15* 
15* 
20* 
1* 
1* 
1747 
16* 
1* 
1* 
28* 
1* 
30* 
29* 
98* 
15* 
1735 
1* 
15* 
3949* 
15* 
1* 
1* 
1* 
474* 
1* 
1424 
1659 
2439 
1* 
20* 
15* 
1916 
3949* 
20* 
15* 
1917 



1919 

2771 
624 
616 
474* 

3870 

474* 
3843 
1974 
2935 

474* 

800 
1837 
2011 

474* 

474* 

1990 
1349 
1349 
2283 
474* 
474* 
1913 
3531 
474* 
474* 
1070 
474* 



1320 
1752 
474* 
1394 
3958 
1429 
474* 
474* 
474* 

474* 
1426 
1687 
2441 

474* 

1302 
2042 

1953 
1303 
2043 



2044 

628 

620 

3892 



3849 
2003 
2949 



3409 



1387 
1387 
2445 

1299 
2039 

3638 
3599 



1403 
3959 
1438 



2126 

632 
641 



202? 
3974 



1419 
1420 
2606 

1353 
2121 

3639 
3601 



1329 1358 



1632 
3960 
1692 



636 
645 



1454 
1454 



1389 
2277 

3795 
3622 



1464 



1643 
3961 
1703 



649 
669 



1482 
1482 



1424 
2439 



3754 



1493 

1662 
1722 



653 



657 



661 



665 



674 



683 



687 725 



2224 2263 2323 2399 2416 2485 2561 



2578 



2646 2722 2739 



1524 
1524 



1459 
2600 



1553 
1553 



1488 

2762 



1598 
1599 



1528 



1623 
1623 



1653 
1653 



1557 1603 



1683 
1683 



1627 



1713 
1713 



1743 
1743 



1657 1687 



1777 
1777 



1717 



1504 1533 1544 1562 

1673 
1733 



1574 



1608 



1645 1675 



1705 



561 


586 


588 


595 


608 


731 


1459 


1461 


1488 


1490 


1528 


1530 


1689 


1717 


1719 


1747 


1749 


1913 


2600 


2602 


2762 


2764 


3274 


3424 


1356 


1392 


M*27 


1462 


1491 


1531 


2124 


2280 


2UU2 


2603 


2765 




2076 


2161 


2331 


2493 


2654 


2776 


1357 


1393 


1428 


1463 


1492 


1532 


2125 


2281 


2443 


2604 


2766 





734 
1557 
1915 
3594 



1560 



1561 



1299 
1559 
2039 
3655 



1301 
1603 
2041 
3744 



1353 
1605 
2121 
3925 



1355 
1627 
2123 



1606 1630 1660 1690 



1607 1631 1661 1691 



1389 
1629 
2277 



1720 
1721 



1391 
1657 
2279 



1750 



1751 



709 


711 


713 


715 


717 


719 


720 


7 21 


722 


723 


474* 










474* 


1299 


1353 


1389 


1424 


1913 


2039 


2121 


2277 


2439 


3958 


3959 


3960 


3961 




474* 
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TYPDEC 1* 474* 1159 18 7 3 1962 2085 2180 2191 3318 3334 3343 3352 3361 3368 

TYPNAM 1* 474* 

TYPNUM 1* 474* 

TYPOCS 1* 474* 

TYPOCT 1* 474* 1109 

TYP T XT 1* 474* 33H 3321 3328 3337 3346 3355 3364 3569 

UBER 32* 1476 1507 1546 1576 1587 1646 1676 1706 1736 1768 3026 

UBES 31* 1322 1366 1396 1431 1467 1497 1536 1567 1611 1635 1665 1695 1725 1759 

V 17* 3576 

VS 18* 

tMSTRT 1* 

S$CMRE 606* 

SSCMTM 606* 

S4FJSCA 1* 

tSNEWT 1* 474* 1299 1353 1389 1424 1459 1488 1528 1557 1603 1627 1657 1687 1717 

1747 1913 2039 2121 2277 2439 2600 2762 

S$SE F 3949* 

$$SKIP 1* 

.EQUAT 1* 

.MEADE 1* 

. 1 1ST 1* 477 

.KT11 1* 

.SETUP 1* 584 

.SURHI 1* 

.SACT1 1* 559 

.SAPTB 1* 732* 

.SAPTH 1* 584 

.SAPTY 1* 3592 

.SASTA 1* 

.$CATC 1* 550 

.SCMTA 1* 606 

.SDB2D 1* 

.$0620 1* 

.SDIV 1* 

.SEOP 1* 327? 

.SERRO 1* 

.SERRT 1* 

.SMULT 1* 

.$POWE 1* 

.SRAND 1* 

.SRDDE 1* 

.SRDOC 1* 

.SREAD 1* 

.SR2AZ 1 * 

.SSAVE 1* 

. SSB2D 1* 

.SSB20 1* 

.SSCOP 1* 3422 

.SSIZE 1* 

.SSUPR 1* 

.STRAP 1* 3923 

.STYPB 1* 

.STYPO 1* 3742 

.STYPE 1* 

.STYPO 1* 3653 
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.V.OCA 1# 

.1170 1# 90 

. ABS. 111270 000 

ERRORS DETECTED: 0 

CEK8GC .BIN.CEKBGC . LST/CRF /SOL/NL : TOC=CE*BGC . SML . CEK8GC.P1 1 
RUN-TIME: 62 58 5 SECONDS 
RUN-TIME RATIO: 196/127=1.5 
CORE USED: 39K (77 PAGES) 



